type token =
| WHEN
| UID of string
| STRING of string
| STAR
| SEMI
| RP
| RC
| PROPERTY
| PREFIX
| NE
| MESSAGE
| LT
| LP
| LID of string
| LEADSTO
| LE
| LC
| INTEGER of int
| INDENT of int
| GT
| GE
| EQ
| EOF
| DOT
| COMMA
| COLONEQ
| COLON
| ARROWARROW
| ARROW
| ARRAYWRITE
| AND
val properties :
(Stdlib.Lexing.lexbuf -> token) ->
Stdlib.Lexing.lexbuf ->
ToplAst.t list