blob: 78d0ceb93575bc19a6d7382794329110c2dab705 (
plain)
1
2
3
4
5
6
7
8
9
10
11
|
--- regex-compat-tdfa-0.95.1.4-orig/Text/Regex.hs 2021-06-25 10:08:26.670791461 +1000
+++ regex-compat-tdfa-0.95.1.4/Text/Regex.hs 2021-06-25 10:08:10.325737439 +1000
@@ -139,7 +139,7 @@
splitRegex :: Regex -> String -> [String]
splitRegex _ [] = []
splitRegex delim strIn =
- let matches = map (!0) (matchAll delim strIn)
+ let matches = map (! 0) (matchAll delim strIn)
go _i str [] = str : []
go i str ((off,len):rest) =
let i' = off+len
|
