diff options
| author | aspiwack | 2011-08-09 14:53:14 +0000 |
|---|---|---|
| committer | aspiwack | 2011-08-09 14:53:14 +0000 |
| commit | f6af94e119909d3a5dcc4624785f143c3dcdf73a (patch) | |
| tree | 06517f9a8772f87d4a6d6e7608a460587bdafd3c | |
| parent | 9e6e9ccac3ac803229336cdef3b272ea7c857993 (diff) | |
Moved the declaration of "Classic" being the default proof mode to coqtop.ml so that the files in Init can benefit from the full-blown tactic language.
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@14392 85f007b7-540e-0410-9357-904b9bb8a0f7
| -rw-r--r-- | theories/Init/Prelude.v | 3 | ||||
| -rw-r--r-- | toplevel/coqtop.ml | 2 |
2 files changed, 3 insertions, 2 deletions
diff --git a/theories/Init/Prelude.v b/theories/Init/Prelude.v index ec2a420156..f9c758054b 100644 --- a/theories/Init/Prelude.v +++ b/theories/Init/Prelude.v @@ -22,5 +22,4 @@ Declare ML Module "ground_plugin". Declare ML Module "dp_plugin". Declare ML Module "recdef_plugin". Declare ML Module "subtac_plugin". -Declare ML Module "xml_plugin". -Global Set Default Proof Mode "Classic". +Declare ML Module "xml_plugin".
\ No newline at end of file diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml index 6f3b424e5c..21ecdd5b05 100644 --- a/toplevel/coqtop.ml +++ b/toplevel/coqtop.ml @@ -315,6 +315,8 @@ let parse_args arglist = let init arglist = Sys.catch_break false; (* Ctrl-C is fatal during the initialisation *) Lib.init(); + (* Default Proofb Mode starts with an alternative default. *) + Goptions.set_string_option_value ["Default";"Proof";"Mode"] "Classic"; begin try let foreign_args = parse_args arglist in |