X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fcomponents%2Fng_library%2FnCicLibrary.mli;h=aff1473c18bdea540949853c36d2d70cf6670b83;hb=fa3139698294b99889afd375298f9b071cdfbd67;hp=9f641d1cafc52c758acaaf9a813d42e360650b7c;hpb=d4f2d4c1a4784f84aa27e1bb96b8b377a6553c65;p=helm.git diff --git a/matita/components/ng_library/nCicLibrary.mli b/matita/components/ng_library/nCicLibrary.mli index 9f641d1ca..aff1473c1 100644 --- a/matita/components/ng_library/nCicLibrary.mli +++ b/matita/components/ng_library/nCicLibrary.mli @@ -49,12 +49,16 @@ module type SerializerType = refresh_uri_in_universe:(NCic.universe -> NCic.universe) -> refresh_uri_in_term:(NCic.term -> NCic.term) -> refresh_uri_in_reference:(NReference.reference -> NReference.reference) -> + alias_only:bool -> 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 require: baseuri: + NUri.uri -> alias_only:bool -> dumpable_status -> dumpable_status * obj + val dependencies_of: baseuri:NUri.uri -> string list end module Serializer(D: sig type dumpable_status end) : @@ -66,7 +70,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 *)