Imported Upstream version 8.0pl3+8.1alphaupstream/8.0pl3+8.1alpha

1 files changed, 9 insertions, 0 deletions

diff --git a/test-suite/success/unicode_utf8.v b/test-suite/success/unicode_utf8.v
new file mode 100644
index 00000000..e3c4dd30
--- /dev/null
+++ b/test-suite/success/unicode_utf8.v
@@ -0,0 +1,9 @@
+(* Check correct separation of identifiers followed by unicode symbols *)
+  Notation "x 〈 w" := (plus x w) (at level 30).
+  Check fun x => x〈x.
+
+(* Check Greek letters *)
+Definition test_greek : nat -> nat := fun Δ => Δ.
+
+(* Check indices *)
+Definition test_indices : nat -> nat := fun x₁ => x₁.