-----------------------------------------------------------------------------
-- |
-- Module      : HLint
-- Description : Lint Testing Coverage
-- Copyright   : (c) 2015 Christopher Reichert
-- License     : BSD3
-- Maintainer  : Christopher Reichert <creichert07@gmail.com>
-- Stability   : testing
-- Portability : POSIX


module Main (main) where


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



main :: IO ()
main = do
    hints <- hlint arguments
    print hints
    if null hints
       then exitSuccess
            else exitFailure



arguments :: [String]
arguments =
      [
        "Network"
      , "test"
      , "client"
      ]