summaryrefslogtreecommitdiff
path: root/test-suite/bugs/closed/3482.v
diff options
context:
space:
mode:
Diffstat (limited to 'test-suite/bugs/closed/3482.v')
-rw-r--r--test-suite/bugs/closed/3482.v11
1 files changed, 11 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/3482.v b/test-suite/bugs/closed/3482.v
new file mode 100644
index 00000000..34a5e73d
--- /dev/null
+++ b/test-suite/bugs/closed/3482.v
@@ -0,0 +1,11 @@
+Set Primitive Projections.
+Class Foo (F : False) := { foo : True }.
+Arguments foo F {Foo}.
+Print Implicit foo. (* foo : forall F : False, Foo F -> True
+
+Argument Foo is implicit and maximally inserted *)
+Check foo _. (* Toplevel input, characters 6-11:
+Error: Illegal application (Non-functional construction):
+The expression "foo" of type "True"
+cannot be applied to the term
+ "?36" : "?35" *) \ No newline at end of file