X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=matita%2Fmatita%2FmatitaScript.mli;h=0c12679f121586b926948d0f1d2a8bd6438f30f9;hb=b890d1579e24e6f7e1d4c6af9afcb0431584a3e0;hp=add51ccf02eb6e88060fd848b5b79b1d42ef9794;hpb=6ab0b3e34eee7c4efa628e2994b461347d1bcebf;p=helm.git diff --git a/matita/matita/matitaScript.mli b/matita/matita/matitaScript.mli index add51ccf0..0c12679f1 100644 --- a/matita/matita/matitaScript.mli +++ b/matita/matita/matitaScript.mli @@ -101,7 +101,9 @@ object end val script: - urichooser: (GSourceView2.source_view -> NReference.reference list -> NReference.reference list) -> + urichooser: + (GSourceView2.source_view -> NReference.reference list -> + NReference.reference list) -> ask_confirmation: (title:string -> message:string -> [`YES | `NO | `CANCEL]) -> parent:GBin.scrolled_window -> @@ -109,6 +111,8 @@ val script: unit -> script +val destroy: int -> unit val current: unit -> script val at_page: int -> script + val iter_scripts: (script -> unit) -> unit