]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/ocaml/mathql_generator/cGMatchConclusion.ml
moved string_of_uriref to UriManager
[helm.git] / helm / ocaml / mathql_generator / cGMatchConclusion.ml
index 8d6aed90818268acaae7238b4bf6433576195c4c..7304b39f5c12d99221d27e021e1043155e54f6ef 100644 (file)
@@ -64,7 +64,7 @@ let levels_of_term metasenv context term =
    in
    let inspect_uri main l uri tc v term =
       let d = degree term in 
-      entry_in (Misc.string_of_uriref (uri, tc), main, 2 * v + d - 1) l 
+      entry_in (UriManager.string_of_uriref (uri, tc), main, 2 * v + d - 1) l 
    in
    let rec inspect_term main l v term = match term with
         Cic.Rel _                        -> l