X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fcomponents%2Fgrafite_engine%2FgrafiteSync.mli;h=f66c0e85383c106ad161be035fcf0690f50ec0c3;hb=08e9d02504942642a917c0d3e4b4795e65172d89;hp=0a2595430462e88341e9cfeb3c458165fb695fcf;hpb=5da42f6120f3075c3da8ab3082ead39ea57955fa;p=helm.git diff --git a/helm/software/components/grafite_engine/grafiteSync.mli b/helm/software/components/grafite_engine/grafiteSync.mli index 0a2595430..f66c0e853 100644 --- a/helm/software/components/grafite_engine/grafiteSync.mli +++ b/helm/software/components/grafite_engine/grafiteSync.mli @@ -40,4 +40,14 @@ val time_travel: present:GrafiteTypes.status -> past:GrafiteTypes.status -> unit (* also resets the imperative part of the status *) -val init: unit -> GrafiteTypes.status +val init: string -> GrafiteTypes.status + +(* + (* just an empty status, does not reset imperative + * part, use push/pop for that *) +val initial_status: string -> GrafiteTypes.status +*) + + (* preserve _only_ imperative parts of the status *) +val push: unit -> unit +val pop: unit -> unit