+ (** {3 Dialogs} *)
+
+exception Cancel (* raised when no answer is given by the user *)
+
+ (** @raise Cancel *)
+val interactive_user_uri_choice: gui:#gui -> MatitaTypes.choose_uris_callback
+
+ (** @raise Cancel *)
+val interactive_interp_choice: gui:#gui -> MatitaTypes.choose_interp_callback
+
+ (** @return true if user hit "ok" button, false if user hit "cancel" button *)
+val ask_confirmation: gui:#gui -> ?title:string -> ?msg:string -> unit -> bool