Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- parseTagged :: Parser (Tag, [Elem])
- parseTagged = do
- char "<"
- tagged <- parseTag
- char ">"
- elems <- parseText
- char "<"
- char "/"
- string tagged
- char ">"have to
- return (FormE tagged elems)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement