--- 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