summaryrefslogtreecommitdiff
path: root/src/Data/List
diff options
context:
space:
mode:
authorJasper Van der Jeugt <m@jaspervdj.be>2017-06-19 11:57:23 +0200
committerJasper Van der Jeugt <m@jaspervdj.be>2017-06-19 11:57:23 +0200
commit67ecff7ad383640bc73d64edc2506c7cc648a134 (patch)
tree6d328e43c3ab86c29a2d775fabaa23618c16fb51 /src/Data/List
parent2df3209bafa08e6b77ee4a8598fc503269513527 (diff)
downloadhakyll-67ecff7ad383640bc73d64edc2506c7cc648a134.tar.gz
Move src/ to lib/, put Init.hs in src/
Diffstat (limited to 'src/Data/List')
-rw-r--r--src/Data/List/Extended.hs15
1 files changed, 0 insertions, 15 deletions
diff --git a/src/Data/List/Extended.hs b/src/Data/List/Extended.hs
deleted file mode 100644
index 485cba8..0000000
--- a/src/Data/List/Extended.hs
+++ /dev/null
@@ -1,15 +0,0 @@
-module Data.List.Extended
- ( module Data.List
- , breakWhen
- ) where
-
-import Data.List
-
--- | Like 'break', but can act on the entire tail of the list.
-breakWhen :: ([a] -> Bool) -> [a] -> ([a], [a])
-breakWhen predicate = go []
- where
- go buf [] = (reverse buf, [])
- go buf (x : xs)
- | predicate (x : xs) = (reverse buf, x : xs)
- | otherwise = go (x : buf) xs