import "JavaBuiltin" as Java

importJava "java.util.regex.Pattern" where
    data Pattern

    compile :: String -> Pattern
    matcher :: Pattern -> String -> <Proc> Matcher

importJava "java.util.regex.Matcher" where
    data Matcher

    matches :: Matcher -> <Proc> Boolean

doMatch pattern text = matches (matcher pattern text)

main = doMatch (compile ".*xxx.*") "fffxxooxxxlll"
--
true