A Peek into Pugs Internals #23

Another simple example

ruleVerbatimBlock = verbatimRule "block" $ do
    body <- between (symbol "{") (char '}') ruleBlockBody
    return $ Syn "block" [body]
continued...
Copyright © 2006 Gaal Yahas