X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_parser%2FgrafiteDisambiguate.mli;h=f13fc418cd381ae6f20d36fe96fbb0f53887b1cf;hb=8ae1653eb75d2b57c50e077c49cb9d078313ea9d;hp=798fa75f528ed734f5e85db3ae9330156582ca29;hpb=5c1b44dfefa085fbb56e23047652d3650be9d855;p=helm.git diff --git a/helm/software/components/grafite_parser/grafiteDisambiguate.mli b/helm/software/components/grafite_parser/grafiteDisambiguate.mli index 798fa75f5..f13fc418c 100644 --- a/helm/software/components/grafite_parser/grafiteDisambiguate.mli +++ b/helm/software/components/grafite_parser/grafiteDisambiguate.mli @@ -37,7 +37,7 @@ type lazy_tactic = val disambiguate_tactic: LexiconEngine.status ref -> Cic.context -> - Cic.metasenv -> + Cic.metasenv -> int option -> tactic Disambiguate.disambiguator_input -> Cic.metasenv * lazy_tactic @@ -52,5 +52,25 @@ val disambiguate_macro: LexiconEngine.status ref -> Cic.metasenv -> Cic.context -> - (CicNotationPt.term GrafiteAst.macro) Disambiguate.disambiguator_input -> - Cic.metasenv * Cic.term GrafiteAst.macro + ((CicNotationPt.term,CicNotationPt.term) GrafiteAst.macro) Disambiguate.disambiguator_input -> + Cic.metasenv * (Cic.term,Cic.lazy_term) GrafiteAst.macro + +val disambiguate_nterm : + NCic.term option -> LexiconEngine.status -> + NCic.context -> NCic.metasenv -> NCic.substitution -> + CicNotationPt.term Disambiguate.disambiguator_input -> + NCic.metasenv * NCic.substitution * LexiconEngine.status * NCic.term + +val disambiguate_nobj : + LexiconEngine.status -> ?baseuri:string -> + (CicNotationPt.term CicNotationPt.obj) Disambiguate.disambiguator_input -> + LexiconEngine.status * NCic.obj + +type pattern = + CicNotationPt.term Disambiguate.disambiguator_input option * + (string * NCic.term) list * NCic.term option + +val disambiguate_npattern: + GrafiteAst.npattern Disambiguate.disambiguator_input -> pattern + +