aboutsummaryrefslogtreecommitdiff
path: root/test-suite
diff options
context:
space:
mode:
authorHugo Herbelin2017-07-07 08:31:10 +0200
committerHugo Herbelin2017-07-07 08:38:18 +0200
commit4df52843c2cc5ce33b2c52b982b14396b4470ef2 (patch)
treedf73a27eeb4cecf0f845f479a41c95294e43aaec /test-suite
parent35e0f327405fb659c7ec5f9f7d26ea284aa45810 (diff)
Fixing environment in warning "Projection value has no head constant".
Delaying also some computation needed for printing to the time of really printing it.
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.
+