File tree 2 files changed +0
-6
lines changed
2 files changed +0
-6
lines changed Original file line number Diff line number Diff line change @@ -392,8 +392,6 @@ withMVar' var unmasked masked = mask $ \restore -> do
392
392
pure c
393
393
394
394
-- | Spawn immediately. If you are already inside a call to shakeRun that will be aborted with an exception.
395
- {- HLINT ignore shakeRun "Redundant bracket" -}
396
- -- HLint seems to get confused by type applications and suggests to remove parentheses.
397
395
shakeRun :: IdeState -> [Action a ] -> IO (IO [a ])
398
396
shakeRun IdeState {shakeExtras= ShakeExtras {.. }, .. } acts =
399
397
withMVar'
Original file line number Diff line number Diff line change @@ -1984,8 +1984,6 @@ cradleTests = testGroup "cradle"
1984
1984
,testGroup " loading" [loadCradleOnlyonce]
1985
1985
]
1986
1986
1987
- {- HLINT ignore loadCradleOnlyonce "Redundant bracket" -}
1988
- -- HLint seems to get confused by type applications and suggests to remove parentheses.
1989
1987
loadCradleOnlyonce :: TestTree
1990
1988
loadCradleOnlyonce = testGroup " load cradle only once"
1991
1989
[ testSession' " implicit" implicit
@@ -2353,8 +2351,6 @@ nthLine i r
2353
2351
| i >= Rope. rows r = error $ " Row number out of bounds: " <> show i <> " /" <> show (Rope. rows r)
2354
2352
| otherwise = Rope. takeWhile (/= ' \n ' ) $ fst $ Rope. splitAtLine 1 $ snd $ Rope. splitAtLine (i - 1 ) r
2355
2353
2356
- {- HLINT ignore getWatchedFilesSubscriptionsUntil "Redundant bracket" -}
2357
- -- HLint seems to get confused by type applications and suggests to remove parentheses.
2358
2354
getWatchedFilesSubscriptionsUntil :: forall end . (FromJSON end , Typeable end ) => Session [Maybe Value ]
2359
2355
getWatchedFilesSubscriptionsUntil = do
2360
2356
msgs <- manyTill (Just <$> message @ RegisterCapabilityRequest <|> Nothing <$ anyMessage) (message @ end )
You can’t perform that action at this time.
0 commit comments