+val parse_statement: Ulexing.lexbuf -> #LexiconEngine.status statement (** @raise End_of_file *)
+
+val statement: unit -> #LexiconEngine.status statement Grammar.Entry.e
+
+(* this callback is called before every grafite statement *)
+val set_grafite_callback:
+ (ast_statement -> unit) -> unit
+
+(* this callback is called before every lexicon command *)
+val set_lexicon_callback:
+ (LexiconAst.command -> unit) -> unit
+
+val push : unit -> unit
+val pop : unit -> unit