aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/success
diff options
context:
space:
mode:
authorGravatar Jason Gross <jgross@mit.edu>2016-04-05 13:18:00 -0400
committerGravatar Jason Gross <jgross@mit.edu>2016-04-05 13:19:07 -0400
commitab08345ebdb477bf4c83b46e0d8adc29296392f9 (patch)
treedde496b7f0e4b87fa239692ae6f5b142c8d0238c /test-suite/success
parenta585d46fbacfcc9cddf3da439e5f7001d429ba2a (diff)
Add -compat 8.4 econstructor tactics, and tests
Passing `-compat 8.4` now allows the use of `econstructor (tac)`, as in 8.4.
Diffstat (limited to 'test-suite/success')
-rw-r--r--test-suite/success/Compat84.v19
1 files changed, 19 insertions, 0 deletions
diff --git a/test-suite/success/Compat84.v b/test-suite/success/Compat84.v
new file mode 100644
index 000000000..db6348fa1
--- /dev/null
+++ b/test-suite/success/Compat84.v
@@ -0,0 +1,19 @@
+(* -*- coq-prog-args: ("-emacs" "-compat" "8.4") -*- *)
+
+Goal True.
+ solve [ constructor 1 ]. Undo.
+ solve [ econstructor 1 ]. Undo.
+ solve [ constructor ]. Undo.
+ solve [ econstructor ]. Undo.
+ solve [ constructor (fail) ]. Undo.
+ solve [ econstructor (fail) ]. Undo.
+ split.
+Qed.
+
+Goal False \/ True.
+ solve [ constructor (constructor) ]. Undo.
+ solve [ econstructor (econstructor) ]. Undo.
+ solve [ constructor 2; constructor ]. Undo.
+ solve [ econstructor 2; econstructor ]. Undo.
+ right; esplit.
+Qed.