Ignore HLint hints in the generated tests
authorNeil Mitchell <ndmitchell@gmail.com>
Tue, 2 May 2017 15:50:12 +0000 (16:50 +0100)
committerNeil Mitchell <ndmitchell@gmail.com>
Tue, 2 May 2017 15:50:12 +0000 (16:50 +0100)
Generate.hs
tests/TestGen.hs

index 36e055c..7fb218e 100755 (executable)
@@ -20,6 +20,7 @@ main = do
         ,"import TestUtil"
         ,"import qualified System.FilePath.Windows as W"
         ,"import qualified System.FilePath.Posix as P"
+        ,"{-# ANN module \"HLint: ignore\" #-}"
         ,"tests :: [(String, Property)]"
         ,"tests ="] ++
         ["    " ++ c ++ "(" ++ show t1 ++ ", " ++ t2 ++ ")" | (c,(t1,t2)) <- zip ("[":repeat ",") tests] ++
index 848ae5b..7bc914e 100755 (executable)
@@ -3,6 +3,7 @@ module TestGen(tests) where
 import TestUtil
 import qualified System.FilePath.Windows as W
 import qualified System.FilePath.Posix as P
+{-# ANN module "HLint: ignore" #-}
 tests :: [(String, Property)]
 tests =
     [("W.pathSeparator == '\\\\'", property $ W.pathSeparator == '\\')