X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fbinaries%2Fsaturate%2Fsaturate_main.ml;h=afe8fbb83f4feffa6b13f87d02ad0a5497465ae6;hb=1238c59b078908f3923aa2e03adee7fe7a291027;hp=efcfca4eda2a34e3df9815c69ca9da68c35e5641;hpb=fc4cf455977934bd737c3d6c8675ef7663a6a588;p=helm.git diff --git a/helm/software/components/binaries/saturate/saturate_main.ml b/helm/software/components/binaries/saturate/saturate_main.ml index efcfca4ed..afe8fbb83 100644 --- a/helm/software/components/binaries/saturate/saturate_main.ml +++ b/helm/software/components/binaries/saturate/saturate_main.ml @@ -64,7 +64,7 @@ struct CicNotationParser.parse_level2_ast (Ulexing.from_utf8_string term) in try - fst (Disambiguator.disambiguate_term ~dbd ~context ~metasenv ast + fst (Disambiguator.disambiguate_term ~dbd ~context ~metasenv ("",0,ast) ?initial_ugraph ~aliases ~universe:None) with Exit -> raise (Ambiguous_term (lazy term)) end