X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fng_refiner%2Fcheck.ml;h=6aba5a993e76ded2157c689c96a40a08b33e729e;hb=8de1a75899a83dd31e856804bd448c1bd87d9ab3;hp=51f0482a525825451ec729a0f9ac14aad34929f8;hpb=dcdbb979433a61e2ef2842d96604098728824416;p=helm.git diff --git a/helm/software/components/ng_refiner/check.ml b/helm/software/components/ng_refiner/check.ml index 51f0482a5..6aba5a993 100644 --- a/helm/software/components/ng_refiner/check.ml +++ b/helm/software/components/ng_refiner/check.ml @@ -272,8 +272,9 @@ let _ = let bo = curryfy [] bo in (try let rdb = { - NRstatus.uhint_db = NCicUnifHint.empty_db; - NRstatus.coerc_db = NCicCoercion.empty_db + NRstatus.uhint_db = NCicUnifHint.empty_db; + NRstatus.coerc_db = NCicCoercion.empty_db; + NRstatus.library_db = NCicLibrary.time0 } in let metasenv, subst, bo, infty = NCicRefiner.typeof rdb [] [] [] bo None