aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--CHANGES6
-rw-r--r--toplevel/coqtop.ml7
2 files changed, 12 insertions, 1 deletions
diff --git a/CHANGES b/CHANGES
index f31f4efa8..8cb515875 100644
--- a/CHANGES
+++ b/CHANGES
@@ -1,6 +1,12 @@
Changes from V8.5beta3
======================
+Vernacular commands
+- Flag -compat 8.4 now loads Coq.Compat.Coq84. The standard way of putting Coq
+ in v8.4 compatibility mode is to pass the command line flag "-compat 8.4". It
+ can be followed by "-require Coq.Compat.AdmitAxiom" if 8.4 behavior of admit is
+ needed, in which case it uses an axiom.
+
Specification language
- Syntax "$(tactic)$" changed to "ltac:(tactic)".
diff --git a/toplevel/coqtop.ml b/toplevel/coqtop.ml
index 72966a4ad..5937fd5c7 100644
--- a/toplevel/coqtop.ml
+++ b/toplevel/coqtop.ml
@@ -196,6 +196,11 @@ let require () =
let map dir = Qualid (Loc.ghost, qualid_of_string dir) in
Vernacentries.vernac_require None (Some false) (List.rev_map map !require_list)
+let add_compat_require v =
+ match v with
+ | Flags.V8_4 -> add_require "Coq.Compat.Coq84"
+ | _ -> ()
+
let compile_list = ref ([] : (bool * string) list)
let glob_opt = ref false
@@ -475,7 +480,7 @@ let parse_args arglist =
|"-async-proofs-private-flags" ->
Flags.async_proofs_private_flags := Some (next ());
|"-worker-id" -> set_worker_id opt (next ())
- |"-compat" -> Flags.compat_version := get_compat_version (next ())
+ |"-compat" -> let v = get_compat_version (next ()) in Flags.compat_version := v; add_compat_require v
|"-compile" -> add_compile false (next ())
|"-compile-verbose" -> add_compile true (next ())
|"-dump-glob" -> Dumpglob.dump_into_file (next ()); glob_opt := true