(* The type of tokens. *) type token = | VDASH | VAR of (string) | SYM of (string) | RIGHT_PAR | RIGHT_BRACK | RIGHT_BRACE | PLUS | MINUS | LEFT_PAR | LEFT_BRACK | LEFT_BRACE | DOT | COMMA (* This exception is raised by the monolithic API functions. *) exception Error (* The monolithic API. *) val spacec: (Lexing.lexbuf -> token) -> Lexing.lexbuf -> (Stellar.constellation * Stellar.constellation) val constc: (Lexing.lexbuf -> token) -> Lexing.lexbuf -> (Stellar.constellation)