test/hlint.hs · patch · git.iko.soy

on 70f445a help sign in

patch/test/hlint.hs

19 lines 477 B history raw

1import Language.Haskell.HLint3 (hlint)

2import System.Exit (exitFailure, exitSuccess)

4main :: IO ()

5main = do

6 ideas <- hlint

7 [ "."

8 , "--ignore=Redundant do"

9 , "--ignore=Use camelCase"

10 , "--ignore=Redundant $"

11 , "--ignore=Use &&"

12 , "--ignore=Use &&&"

13 , "--ignore=Use const"

14 , "--ignore=Use >=>"

15 , "--ignore=Use ."

16 , "--ignore=Use unless"

17 , "--cpp-define=USE_TEMPLATE_HASKELL"

18 ]

19 if null ideas then exitSuccess else exitFailure