shake-ext 0.2.0.3 → 0.3.0.0

raw patch · 3 files changed

+16/−11 lines, 3 filesdep +composition-preludePVP ok

version bump matches the API change (PVP)

Dependencies added: composition-prelude

API changes (from Hackage documentation)

Files

• shake-ext.cabal +3/−2
• src/Development/Shake/FileDetect.hs +9/−5
• src/Development/Shake/Linters.hs +4/−4

@@ -1,5 +1,5 @@ name:                shake-ext-version:             0.2.0.3+version:             0.3.0.0 synopsis:            Helper functions for linting with shake  description:         This package provides several linters out of the box, as well as functionality for building ATS source files with [shake](http://shakebuild.com/). homepage:            https://hub.darcs.net/vmchale/shake-ext@@ -27,7 +27,8 @@                      , Development.Shake.ATS   build-depends:       base >= 4.10 && < 5                      , shake-                     , language-ats +                     , language-ats+                     , composition-prelude   default-language:    Haskell2010   if flag(development)     ghc-options:       -Werror

@@ -10,7 +10,8 @@     , getShell     ) where -import           Data.Semigroup    ((<>))+import           Control.Composition+import           Data.Semigroup      ((<>)) import           Development.Shake  getYml :: Action [FilePath]@@ -19,8 +20,8 @@ getToml :: Action [FilePath] getToml = getAll ["toml"] -getHs :: Action [FilePath]-getHs = getAll ["hs", "hs-boot", "hsig", "lhs"]+getHs :: [FilePath] -> Action [FilePath]+getHs files = join <$> mapM (`getAllDir` ["hs", "hs-boot", "hsig", "lhs"]) files  getHappy :: Action [FilePath] getHappy = getAll ["y", "yl"]@@ -29,13 +30,16 @@ getAlex = getAll ["x"]  getShell :: Action [FilePath]-getShell = getDirectoryFiles "" ["//*.sh"]+getShell = getAll ["sh"]  get :: String -> Action [FilePath] get = getAll . pure  getAll :: [String] -> Action [FilePath]-getAll ss = getDirectoryFiles "" (("//*." ++) <$> ss)+getAll = getAllDir ""++getAllDir :: FilePath -> [String] -> Action [FilePath]+getAllDir dir ss = getDirectoryFiles "" (((dir ++ "//*.") ++) <$> ss)  getSats :: Action [FilePath] getSats = get "sats"

@@ -19,8 +19,8 @@ shellcheck :: [FilePath] -> Action () shellcheck = checkFiles "shellcheck" -ghc :: Action ()-ghc = checkFiles "ghc -Wall -Werror -Wincomplete-uni-patterns -Wincomplete-record-updates -fno-code" =<< getHs+ghc :: [FilePath] -> Action ()+ghc dirs = checkFiles "ghc -Wall -Werror -Wincomplete-uni-patterns -Wincomplete-record-updates -fno-code" =<< getHs dirs  -- | Check all @.toml@ files using -- [tomlcheck](http://hackage.haskell.org/package/tomlcheck).@@ -29,8 +29,8 @@  -- | Lint all @.hs@, @.hsig@, and @.hs-boot@ files using -- [hlint](http://hackage.haskell.org/package/hlint).-hlint :: Action ()-hlint = checkFiles "hlint" =<< getHs+hlint :: [FilePath] -> Action ()+hlint dirs = checkFiles "hlint" =<< getHs dirs  -- | Lint all files ending in @yaml@ or @yml@ using -- [yamllint](https://pypi.python.org/pypi/yamllint).