module Regexdo.TypeDo where import Text.Regex.Base.RegexLike -- pcre type GroupReplacer acc = (MatchArray -> acc -> acc) -- MatchArray -> acc -> acc -- stringsearch, Pcre.Replace data Needle n = Needle n deriving (Functor) -- Bs, String, RegexPcre data Haystack h = Haystack h deriving (Functor) -- Bs, String data Replacement r = Replacement r deriving (Functor) -- Bs, String type PosLen = (MatchOffset, MatchLength) data ReplaceCase = Once -- ^ may be omitted | All -- ^ if both Once and All are passed, All prevails | Utf8 | Multiline deriving Eq