]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/metadata/metadataTypes.mli
ocaml 3.09 transition
[helm.git] / helm / ocaml / metadata / metadataTypes.mli
index 5a2456de10fb2b1a62da4ebb431174807b18ddc6..f86ff84f566b4c4f31c1ba01b72ae5ca01d6e234 100644 (file)
@@ -53,13 +53,13 @@ type pi_depth = int
 type metadata =
   [ `Sort of Cic.sort * main_position
   | `Rel of main_position
-  | `Obj of string * position
+  | `Obj of UriManager.uri * position
   ]
 
 type constr =
   [ `Sort of Cic.sort * main_position list
   | `Rel of main_position list
-  | `Obj of string * position list
+  | `Obj of UriManager.uri * position list
   ]
 
 val constr_of_metadata: metadata -> constr