diff options
Diffstat (limited to 'src/Data/List')
| -rw-r--r-- | src/Data/List/Extended.hs | 15 |
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 |
