X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;ds=sidebyside;f=matitaB%2Fcomponents%2Fng_refiner%2FnCicUnifHint.ml;h=d228db7b6b6f134ab335f0c6a0efa2edb5361b7e;hb=1c8e230b1d81491b38126900d76201fb84303ced;hp=ff8de755469b21ffb336e9f4a833e3c4016f0682;hpb=cacbe3c6493ddce76c4c13379ade271d8dd172e8;p=helm.git

diff --git a/matitaB/components/ng_refiner/nCicUnifHint.ml b/matitaB/components/ng_refiner/nCicUnifHint.ml
index ff8de7554..d228db7b6 100644
--- a/matitaB/components/ng_refiner/nCicUnifHint.ml
+++ b/matitaB/components/ng_refiner/nCicUnifHint.ml
@@ -51,9 +51,9 @@ class type g_status =
   method uhint_db: db
  end
 
-class virtual status =
+class virtual status (uid : string option) =
  object
-  inherit NCic.status
+  inherit NCicEnvironment.status uid
   val db = HDB.empty, EQDB.empty
   method uhint_db = db
   method set_uhint_db v = {< db = v >}