1open regexEMCML; 2 3structure regexExe :> regex = 4struct 5 6 open regexType; 7 8 fun match r s = regexEMCML.accept (mapToRegExe r) (explode s); (*: RegEx -> string -> bool*) 9 10end 11 12