module Main (main) where import Language.Haskell.HLint (hlint) import System.Exit (exitFailure, exitSuccess) main :: IO () main = do hints <- hlint ["lib", "src"] if null hints then exitSuccess else exitFailure