]> matita.cs.unibo.it Git - helm.git/commitdiff
workaround for an assertion failure during rendering (missing sort of some ids)
authorStefano Zacchiroli <zack@upsilon.cc>
Thu, 28 Jul 2005 10:48:26 +0000 (10:48 +0000)
committerStefano Zacchiroli <zack@upsilon.cc>
Thu, 28 Jul 2005 10:48:26 +0000 (10:48 +0000)
helm/ocaml/cic_notation/cicNotationRew.ml

index b5d3d271dbd798880fa947b15b4652c660be9fed..dba599fc895fcafc01cd999b26927edbaa259c4e 100644 (file)
@@ -259,7 +259,9 @@ let ast_of_acic0 term_info acic k =
   let sort_of_id id =
     try
       Hashtbl.find term_info.sort id
-    with Not_found -> assert false
+    with Not_found ->
+      prerr_endline (sprintf "warning: sort of id %s not found, using Type" id);
+      `Type
   in
   let aux_substs substs =
     Some