type token = | XML_TAG| WHITESPACE of string| TRANSCLUDE| TITLE| TEXT of string| TEX| TAXON| TAG| SUBTREE| SCOPE| RSQUARE| RPAREN| REF| RBRACE| QUERY_TREE| QUERY_TAXON| QUERY_TAG| QUERY_OR| QUERY_NOT| QUERY_META| QUERY_AUTHOR| QUERY_AND| PUT| PRIM of Core.Prim.t| PATCH| PARENT| OPEN| OBJECT| NUMBER| NAMESPACE| META| LSQUARE| LPAREN| LET| LBRACE| IMPORT| IDENT of string| HASH_LBRACE| HASH_HASH_LBRACE| GET| EXPORT| EOF| DEFAULT| DEF| DATE| CONTRIBUTOR| CALL| AUTHOR| ALLOCval main :
(Stdlib.Lexing.lexbuf -> token) ->
Stdlib.Lexing.lexbuf ->
Core.Code.t