X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_engine%2FgrafiteTypes.ml;h=244ce615f67f01542759a7a2cc1ecf23dc2a53e1;hb=403e3c6f8e9288926e1bca283ff0bf54233354a2;hp=71fd19f94b6d7289d1a7a47336d9ed05dab4914a;hpb=5c1b44dfefa085fbb56e23047652d3650be9d855;p=helm.git

diff --git a/helm/software/components/grafite_engine/grafiteTypes.ml b/helm/software/components/grafite_engine/grafiteTypes.ml
index 71fd19f94..244ce615f 100644
--- a/helm/software/components/grafite_engine/grafiteTypes.ml
+++ b/helm/software/components/grafite_engine/grafiteTypes.ml
@@ -44,21 +44,11 @@ type proof_status =
       (* Status in which the proof could be while it is being processed by the
       * engine. No status entering/exiting the engine could be in it. *)
 
-(* REMOVE
-module StringMap = Map.Make (String)
-type option_value =
-  | String of string
-  | Int of int
-*)
-(* type options = option_value StringMap.t *)
-(* let no_options = StringMap.empty *)
-
 type status = {
   moo_content_rev: GrafiteMarshal.moo;
   proof_status: proof_status;
-(*   options: options; *)
   objects: UriManager.uri list;
-  coercions: UriManager.uri list;
+  coercions: CoercDb.coerc_db;
   universe:Universe.universe;  
   baseuri: string;
 }