module Development.Shake.Linters ( tomlcheck
, yamllint
, hlint
, shellcheck
, ghc
, module Development.Shake.FileDetect
) where
import Development.Shake
import Development.Shake.FileDetect
checkFiles :: String -> [FilePath] -> Action ()
checkFiles str = mapM_ (cmd_ . ((str ++ " ") ++))
shellcheck :: [FilePath] -> Action ()
shellcheck = checkFiles "shellcheck"
ghc :: Action ()
ghc = checkFiles "ghc -Wall -Werror -Wincomplete-uni-patterns -Wincomplete-record-updates -fno-code" =<< getHs
tomlcheck :: Action ()
tomlcheck = checkFiles "tomlcheck --file" =<< getToml
hlint :: Action ()
hlint = checkFiles "hlint" =<< getHs
yamllint :: Action ()
yamllint = checkFiles "yamllint -s" =<< getYml