aboutsummaryrefslogtreecommitdiff
path: root/test-suite/success
diff options
context:
space:
mode:
authorMaxime Dénès2017-05-31 16:58:29 +0200
committerMaxime Dénès2017-05-31 16:58:29 +0200
commiteed90d1bd867dce59f6bf1b2bf769fff188f128b (patch)
treecfbf3bb666b23d0ddce9ea3c370c54eb4a87a150 /test-suite/success
parent23588ea0ccacd7e0071cbbad3328d871414f37c6 (diff)
parentbbde815f8108f4641f5411d03f7a88096cc2221b (diff)
Merge PR#248: Adding eassert, eset, epose, etc.
Diffstat (limited to 'test-suite/success')
-rw-r--r--test-suite/success/Abstract.v1
-rw-r--r--test-suite/success/forward.v18
2 files changed, 18 insertions, 1 deletions
diff --git a/test-suite/success/Abstract.v b/test-suite/success/Abstract.v
index ffd50f6efd..69dc9aca78 100644
--- a/test-suite/success/Abstract.v
+++ b/test-suite/success/Abstract.v
@@ -1,4 +1,3 @@
-
(* Cf coqbugs #546 *)
Require Import Omega.
diff --git a/test-suite/success/forward.v b/test-suite/success/forward.v
new file mode 100644
index 0000000000..0ed5b524f3
--- /dev/null
+++ b/test-suite/success/forward.v
@@ -0,0 +1,18 @@
+(* Testing forward reasoning *)
+
+Goal 0=0.
+Fail assert (_ = _).
+eassert (_ = _)by reflexivity.
+eassumption.
+Qed.
+
+Goal 0=0.
+Fail set (S ?[nl]).
+eset (S ?[n]).
+remember (S ?n) as x.
+instantiate (n:=0).
+Fail remember (S (S _)).
+eremember (S (S ?[x])).
+instantiate (x:=0).
+reflexivity.
+Qed.