shake 0.11.3 → 0.11.4
raw patch · 7 files changed
+19/−4 lines, 7 files
Files
- CHANGES.txt +5/−0
- Development/Shake.hs +1/−1
- Development/Shake/Rules/Directory.hs +7/−1
- Development/Shake/Value.hs +1/−1
- Examples/Test/FilePath.hs +2/−0
- html/shake-ui.js +2/−0
- shake.cabal +1/−1
CHANGES.txt view
@@ -1,5 +1,10 @@ Changelog for Shake +0.11.4+ Work with QuickCheck-2.7 (which defines ===)+ #100, handle GraphViz missing gracefully+ Fix up the profiling report generation+ #99, add getEnvWithDefault 0.11.3 #97, fix a serialisation bug when > 254 arguments to need 0.11.2
Development/Shake.hs view
@@ -122,7 +122,7 @@ -- * Directory rules doesFileExist, doesDirectoryExist, getDirectoryContents, getDirectoryFiles, getDirectoryDirs, -- * Environment rules- getEnv,+ getEnv, getEnvWithDefault, -- * Oracle rules addOracle, askOracle, askOracleWith, -- * Special rules
Development/Shake/Rules/Directory.hs view
@@ -4,13 +4,15 @@ module Development.Shake.Rules.Directory( doesFileExist, doesDirectoryExist, getDirectoryContents, getDirectoryFiles, getDirectoryDirs,- getEnv,+ getEnv, getEnvWithDefault, removeFiles, removeFilesAfter, defaultRuleDirectory ) where +import Control.Applicative import Control.Monad import Control.Monad.IO.Class+import Data.Maybe import Data.Binary import Data.List import qualified System.Directory as IO@@ -154,6 +156,10 @@ GetEnvA res <- apply1 $ GetEnvQ var return res +-- | Return the value of the environment variable, or the default value if it+-- not set. Similar to 'getEnv'.+getEnvWithDefault :: String -> String -> Action String+getEnvWithDefault def var = fromMaybe def <$> getEnv var -- | Get the contents of a directory. The result will be sorted, and will not contain -- the entries @.@ or @..@ (unlike the standard Haskell version). The resulting paths will be relative
Development/Shake/Value.hs view
@@ -64,7 +64,7 @@ instance Eq Value where Value a == Value b = maybe False (a ==) $ cast b- Value a /= Value b = maybe False (a /=) $ cast b+ Value a /= Value b = maybe True (a /=) $ cast b ---------------------------------------------------------------------
Examples/Test/FilePath.hs view
@@ -23,6 +23,8 @@ test build obj = do+ let a === b = a Examples.Util.=== b -- duplicate definition in QuickCheck 2.7 and above+ let norm x = let s = normalise x b = BS.unpack (BS.normalise $ BS.pack x)
html/shake-ui.js view
@@ -249,6 +249,8 @@ var xs = ruleGraph(shakeEx, report.query); if (xs.length > 250) $("#output").html("Viewing a graph with > 250 nodes is not supported, and you have " + xs.length + " nodes. Try grouping more aggressively");+ else if (typeof Viz === 'undefined')+ $("#output").html("Profile reports do not seem to have been built with GraphViz support, this feature is unavailable."); else { var res = "digraph \"\"{";
shake.cabal view
@@ -1,7 +1,7 @@ cabal-version: >= 1.10 build-type: Simple name: shake-version: 0.11.3+version: 0.11.4 license: BSD3 license-file: LICENSE category: Development