aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorMaxime Dénès2017-07-07 16:16:21 +0200
committerMaxime Dénès2017-07-07 16:16:21 +0200
commitba7129f547d1f06c7eb67412404445681d22b920 (patch)
tree01f03c08ff1269aac849917bcac3d4ba5a15b1c3 /test-suite
parent711dbf63cdb91631903cac45170077bf67505a56 (diff)
parent4df52843c2cc5ce33b2c52b982b14396b4470ef2 (diff)
Merge PR #863: Fixing environment in warning "Projection value has no head constant".
Diffstat (limited to 'test-suite')
-rw-r--r--test-suite/output/Warnings.out3
-rw-r--r--test-suite/output/Warnings.v5
2 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/output/Warnings.out b/test-suite/output/Warnings.out
new file mode 100644
index 0000000000..a70f8ca45a
--- /dev/null
+++ b/test-suite/output/Warnings.out
@@ -0,0 +1,3 @@
+File "stdin", line 4, characters 0-22:
+Warning: Projection value has no head constant: fun x : B => x in canonical
+instance a of b, ignoring it. [projection-no-head-constant,typechecker]
diff --git a/test-suite/output/Warnings.v b/test-suite/output/Warnings.v
new file mode 100644
index 0000000000..7465442cab
--- /dev/null
+++ b/test-suite/output/Warnings.v
@@ -0,0 +1,5 @@
+(* Term in warning was not printed in the right environment at some time *)
+Record A := { B:Type; b:B->B }.
+Definition a B := {| B:=B; b:=fun x => x |}.
+Canonical Structure a.
+