Imported Upstream version 8.0pl1upstream/8.0pl1

1 files changed, 67 insertions, 0 deletions

diff --git a/ide/preferences.mli b/ide/preferences.mli
new file mode 100644
index 00000000..b4be283d
--- /dev/null
+++ b/ide/preferences.mli
@@ -0,0 +1,67 @@
+(************************************************************************)
+(*  v      *   The Coq Proof Assistant  /  The Coq Development Team     *)
+(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *)
+(*   \VV/  **************************************************************)
+(*    //   *      This file is distributed under the terms of the       *)
+(*         *       GNU Lesser General Public License Version 2.1        *)
+(************************************************************************)
+
+(* $Id: preferences.mli,v 1.8.2.1 2004/07/16 19:30:21 herbelin Exp $ *)
+
+type pref =
+    {
+      mutable cmd_coqc : string;
+      mutable cmd_make : string;
+      mutable cmd_coqmakefile : string;
+      mutable cmd_coqdoc : string;
+
+      mutable global_auto_revert : bool;
+      mutable global_auto_revert_delay : int;
+
+      mutable auto_save : bool;
+      mutable auto_save_delay : int;
+      mutable auto_save_name : string * string;
+
+      mutable encoding_use_locale : bool;
+      mutable encoding_use_utf8 : bool;
+      mutable encoding_manual : string;
+
+      mutable automatic_tactics : string list;
+      mutable cmd_print : string;
+
+      mutable modifier_for_navigation : Gdk.Tags.modifier list;
+      mutable modifier_for_templates : Gdk.Tags.modifier list;
+      mutable modifier_for_tactics : Gdk.Tags.modifier list;
+      mutable modifiers_valid : Gdk.Tags.modifier list;
+
+      mutable cmd_browse : string * string;
+      mutable cmd_editor : string * string;
+
+      mutable text_font : Pango.font_description;
+
+      mutable doc_url : string;
+      mutable library_url : string;
+
+      mutable show_toolbar : bool;
+      mutable contextual_menus_on_goal : bool;
+      mutable window_width : int;
+      mutable window_height : int;
+      mutable query_window_width : int;
+      mutable query_window_height : int;
+(*
+      mutable use_utf8_notation : bool;
+*)
+      mutable auto_complete : bool;
+    }
+
+val save_pref : unit -> unit
+val load_pref : unit -> unit
+
+val current : pref ref
+
+val configure : unit -> unit
+
+val change_font : ( Pango.font_description -> unit) ref
+val show_toolbar : (bool -> unit) ref
+val auto_complete : (bool -> unit) ref
+val resize_window : (unit -> unit) ref