]> matita.cs.unibo.it Git - helm.git/blobdiff - helm/software/components/grafite/grafiteAstPp.ml
- init_cache_and_tables rewritten using the automation_cache
[helm.git] / helm / software / components / grafite / grafiteAstPp.ml
index 95600c1828eb635e3b3233b8315b0031416b3d75..4e10cfa8b28e3187af114b1642443851aced8b26 100644 (file)
@@ -327,6 +327,7 @@ let pp_coercion ~term_pp t do_composites arity saturations=
     
 let pp_command ~term_pp ~obj_pp = function
   | Index (_,_,uri) -> "Indexing " ^ UriManager.string_of_uri uri
+  | Select (_,uri) -> "Selecting " ^ UriManager.string_of_uri uri
   | Coercion (_, t, do_composites, i, j) ->
      pp_coercion ~term_pp t do_composites i j
   | PreferCoercion (_,t) ->