aboutsummaryrefslogtreecommitdiffhomepage
path: root/test-suite/bugs/opened
diff options
context:
space:
mode:
authorGravatar Jasper Hugunin <jasperh@cs.washington.edu>2017-12-18 21:51:25 +0900
committerGravatar Jasper Hugunin <jasperh@cs.washington.edu>2018-01-17 14:59:11 +0900
commit2d8dcd741d229c4de57ccce9f3ab09b808ccfc94 (patch)
tree1f1b510add53ed24ffd403a6f1e03f1095dfad5f /test-suite/bugs/opened
parent8ea2a8307a8d96f8275ebbd9bd4cbd1f6b0a00c6 (diff)
Let dtauto recognize '@sigT A (fun _ => B)' as a conjunction
Diffstat (limited to 'test-suite/bugs/opened')
-rw-r--r--test-suite/bugs/opened/6393.v11
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/bugs/opened/6393.v b/test-suite/bugs/opened/6393.v
new file mode 100644
index 000000000..8d5d09233
--- /dev/null
+++ b/test-suite/bugs/opened/6393.v
@@ -0,0 +1,11 @@
+(* These always worked. *)
+Goal prod True True. firstorder. Qed.
+Goal True -> @sigT True (fun _ => True). firstorder. Qed.
+Goal prod True True. dtauto. Qed.
+Goal prod True True. tauto. Qed.
+
+(* These should work. *)
+Goal @sigT True (fun _ => True). dtauto. Qed.
+(* These should work, but don't *)
+(* Goal @sigT True (fun _ => True). firstorder. Qed. *)
+(* Goal @sigT True (fun _ => True). tauto. Qed. *)