at master 691 B view raw
1diff -rN -u old-regex-compat-tdfa/Text/Regex.hs new-regex-compat-tdfa/Text/Regex.hs 2--- old-regex-compat-tdfa/Text/Regex.hs 2022-02-20 13:42:36.828752458 +0100 3+++ new-regex-compat-tdfa/Text/Regex.hs 2022-02-20 13:42:36.828752458 +0100 4@@ -139,7 +139,7 @@ 5 splitRegex :: Regex -> String -> [String] 6 splitRegex _ [] = [] 7 splitRegex delim strIn = 8- let matches = map (!0) (matchAll delim strIn) 9+ let matches = map (! 0) (matchAll delim strIn) 10 go _i str [] = str : [] 11 go i str ((off,len):rest) = 12 let i' = off+len 13@@ -194,4 +194,4 @@ 14 then [firstline,""] 15 else firstline : loop remainder 16 17--} 18\ No newline at end of file 19+-}