summaryrefslogtreecommitdiff
path: root/src/Data/List
diff options
context:
space:
mode:
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