diff options
| author |  desmettr <desmettr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-02-05 15:52:31 +0000 |
|---|---|---|
| committer | desmettr <desmettr@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-02-05 15:52:31 +0000 |
| commit | 7da87c68444558218bca2a3b070086712d727bcc (patch) | |
| tree | 75933829be7dec8c908a15131bb7195c3414b66c /lib | |
| parent | 36c0dbed2d5035c77cd1f2780269b95dc49a621c (diff) | |
Ajout du traducteur
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3664 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/options.ml | 6 | ||||
| -rw-r--r-- | lib/options.mli | 5 |
2 files changed, 11 insertions, 0 deletions
diff --git a/lib/options.ml b/lib/options.ml index cd0de97a4..f2cc7a09d 100644 --- a/lib/options.ml +++ b/lib/options.ml @@ -26,6 +26,12 @@ let xml_export = ref false let v7 = ref true +(* Translate *) +let translate = ref false +let make_translate f = translate := f; () +let do_translate () = !translate +let translate_file = ref false + (* Silent / Verbose *) let silent = ref false let make_silent flag = silent := flag; () diff --git a/lib/options.mli b/lib/options.mli index 59617ec34..af08f689e 100644 --- a/lib/options.mli +++ b/lib/options.mli @@ -25,6 +25,11 @@ val xml_export : bool ref val v7 : bool ref +val translate : bool ref +val make_translate : bool -> unit +val do_translate : unit -> bool +val translate_file : bool ref + val make_silent : bool -> unit val is_silent : unit -> bool val is_verbose : unit -> bool |