diff options
| author |  herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-29 12:09:35 +0000 |
|---|---|---|
| committer | herbelin <herbelin@85f007b7-540e-0410-9357-904b9bb8a0f7> | 2003-04-29 12:09:35 +0000 |
| commit | 9879919fca94db3524d21b30fa6b7ece9d222fdd (patch) | |
| tree | e321bb99826a5cd970a4ed51c034a737a05c8e11 /lib | |
| parent | 6d8f0e95c4b182d4c3f3f06c790acb6677caf591 (diff) | |
Mise en place d'un 2ème traducteur à l'essai (activable avec -ftranslate2)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@3981 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/options.ml | 1 | ||||
| -rw-r--r-- | lib/options.mli | 1 |
2 files changed, 2 insertions, 0 deletions
diff --git a/lib/options.ml b/lib/options.ml index 7527c82f9..b67f8359d 100644 --- a/lib/options.ml +++ b/lib/options.ml @@ -32,6 +32,7 @@ let translate = ref false let make_translate f = translate := f; v7 := f; () let do_translate () = !translate let translate_file = ref false +let p1 = ref true (* Silent / Verbose *) let silent = ref false diff --git a/lib/options.mli b/lib/options.mli index 8772d2200..a65958e4f 100644 --- a/lib/options.mli +++ b/lib/options.mli @@ -30,6 +30,7 @@ val translate : bool ref val make_translate : bool -> unit val do_translate : unit -> bool val translate_file : bool ref +val p1 : bool ref val make_silent : bool -> unit val is_silent : unit -> bool |