@@ -1,12 +0,0 @@
2− ( module Text.Regex.Posix
7−import Text.Regex.Posix
9−regsubmatch :: String -> String -> [String]
10−regsubmatch buf patt = let (_,_,_,x) = f in x
11− where f :: (String,String,String,[String])
12− f = match (makeRegexOpts compExtended execBlank patt) buf