X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_library%2FnCicLibrary.mli;h=3781a47e2dfa757c095d1c5cdca1ede6b5138b89;hb=ceac1e90a8108f526e33bbae7173571c55ea802d;hp=ee1ed3ece6996c74b936aeb0d6595f2dc9c44b7d;hpb=2c977fe8fdfb6930ed73c6ef806ed35423f4ab6c;p=helm.git diff --git a/matita/components/ng_library/nCicLibrary.mli b/matita/components/ng_library/nCicLibrary.mli index ee1ed3ece..3781a47e2 100644 --- a/matita/components/ng_library/nCicLibrary.mli +++ b/matita/components/ng_library/nCicLibrary.mli @@ -18,9 +18,10 @@ type timestamp class virtual status : object ('self) - inherit NCic.status + inherit NCicExtraction.status method timestamp: timestamp method set_timestamp: timestamp -> 'self + (*CSC: bug here, we are not copying the NCicExtraction part of the status *) end (* it also checks it and add it to the environment *) @@ -77,7 +78,7 @@ module type SerializerType = val dependencies_of: baseuri:NUri.uri -> string list end -module Serializer(D: sig type dumpable_s val get: dumpable_s -> dumpable_status val set: dumpable_s -> dumpable_status -> dumpable_s end) : +module Serializer(D: sig type dumpable_s = private #dumpable_status end) : SerializerType with type dumpable_status = D.dumpable_s val refresh_uri: NUri.uri -> NUri.uri