From c2a67e6f1cdd803b46a3ff4dc259c1cc57ade33f Mon Sep 17 00:00:00 2001
From: Hugo Herbelin
Date: Mon, 27 Jul 2015 14:02:50 +0200
Subject: Fixing #4305 (compatibility wrt 8.4 in not interpreting an
 abbreviation not bound to an applied constructor as itself but rather as a
 binding variable as it was the case for non-applied constructor). This was
 broken by e5c02503 while fixed #3483 (Not_found uncaught with a notation to a
 non-constructor).

---
 test-suite/bugs/closed/4305.v | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)
 create mode 100644 test-suite/bugs/closed/4305.v

(limited to 'test-suite')

diff --git a/test-suite/bugs/closed/4305.v b/test-suite/bugs/closed/4305.v
new file mode 100644
index 0000000000..39fc02d22b
--- /dev/null
+++ b/test-suite/bugs/closed/4305.v
@@ -0,0 +1,17 @@
+(* Check fallback when an abbreviation is not interpretable as a pattern *)
+
+Notation foo := Type.
+
+Definition t :=
+  match 0 with
+  | S foo => foo
+  | _ => 0
+  end.
+
+Notation bar := (option Type).
+
+Definition u :=
+  match 0 with
+  | S bar => bar
+  | _ => 0
+  end.
-- 
cgit v1.2.3