]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/grafite_parser/grafiteParser.mli
callbacks were taking in input a status bu were not using them.
[helm.git] / helm / software / components / grafite_parser / grafiteParser.mli
index 08015d8dd187406adf1e76854f39868222102cc6..d657e49752e2e23ac0e64dfcc2448cf6a12625a7 100644 (file)
@@ -48,11 +48,11 @@ val statement: unit -> #LexiconEngine.status statement Grammar.Entry.e
 
 (* this callback is called before every grafite statement *)
 val set_grafite_callback:
-   (#LexiconEngine.status -> ast_statement -> unit) -> unit 
+   (ast_statement -> unit) -> unit 
 
 (* this callback is called before every lexicon command *)
 val set_lexicon_callback:
-   (#LexiconEngine.status -> LexiconAst.command -> unit) -> unit 
+   (LexiconAst.command -> unit) -> unit 
 
 val push : unit -> unit
 val pop : unit -> unit