shake 0.3.7 → 0.3.8
raw patch · 3 files changed
+4/−2 lines, 3 files
Files
- Development/Shake/FilePattern.hs +2/−1
- Examples/Test/FilePattern.hs +1/−0
- shake.cabal +1/−1
Development/Shake/FilePattern.hs view
@@ -37,7 +37,8 @@ pattern = Concat Start . foldr Concat End . map f where f Star = Bracket $ Repeat $ Not pathSeparators- f SlashSlash = let s = Start `Or` End `Or` Lit pathSeparators in Bracket $ s `Concat` Repeat Any `Concat` s+ f SlashSlash = let s = Start `Or` End `Or` Lit pathSeparators in Bracket $+ Or (s `Concat` Repeat Any `Concat` s) (Lit pathSeparators) f (Char x) = Lit $ if x == '/' then pathSeparators else [x]
Examples/Test/FilePattern.hs view
@@ -18,6 +18,7 @@ f False "foo//bar" "foobar" f False "foo//bar" "foobar/bar" f False "foo//bar" "foo/foobar"+ f True "foo//bar" "foo/bar" assert (compatible []) "compatible" assert (compatible ["//*a.txt","foo//a*.txt"]) "compatible"
shake.cabal view
@@ -1,7 +1,7 @@ cabal-version: >= 1.8 build-type: Simple name: shake-version: 0.3.7+version: 0.3.8 license: BSD3 license-file: LICENSE category: Development