X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_library%2FnCicLibrary.mli;h=4e080e8c2920c54136b15c0dd744be4a4aa42e5d;hb=d8c17db3c787f3ea964bbcd3b27427ca44b356d0;hp=bad0d89752eddcaa92658a49cde7ee51614901e7;hpb=53a5acbe28212706be9c684d612aee1ccb165587;p=helm.git diff --git a/matita/components/ng_library/nCicLibrary.mli b/matita/components/ng_library/nCicLibrary.mli index bad0d8975..4e080e8c2 100644 --- a/matita/components/ng_library/nCicLibrary.mli +++ b/matita/components/ng_library/nCicLibrary.mli @@ -12,6 +12,7 @@ (* $Id$ *) exception LibraryOutOfSync of string Lazy.t +exception IncludedFileNotCompiled of string * string type timestamp @@ -47,12 +48,15 @@ module type SerializerType = 'a -> refresh_uri_in_universe:(NCic.universe -> NCic.universe) -> refresh_uri_in_term:(NCic.term -> NCic.term) -> + refresh_uri_in_reference:(NReference.reference -> NReference.reference) -> dumpable_status -> dumpable_status val register: < run: 'a. string -> 'a register_type -> ('a -> obj) > - val serialize: baseuri:NUri.uri -> obj list -> unit + val serialize: baseuri:NUri.uri -> dependencies:string list -> obj list -> + unit (* the obj is the "include" command to be added to the dump list *) val require: baseuri:NUri.uri -> dumpable_status -> dumpable_status * obj + val dependencies_of: baseuri:NUri.uri -> string list end module Serializer(D: sig type dumpable_status end) : @@ -64,7 +68,11 @@ class dumpable_status : method set_dump: obj list -> 'self end -(* CSC: only required during old-to-NG phase, to be deleted *) val refresh_uri: NUri.uri -> NUri.uri +val ng_path_of_baseuri: ?no_suffix:bool -> NUri.uri -> string + +(* IMPERATIVE STUFF, TO BE PUT IN THE STATUS *) +val get_already_included: unit -> NUri.uri list + (* EOF *)