module Main (main) where

import Language.Haskell.HLint (hlint)
import System.Exit (exitFailure, exitSuccess)

main :: IO ()
main = do
    hints <- hlint [ "--language=TypeApplications", "src" ]
    if null hints then exitSuccess else exitFailure