diff options
| author | Pierre-Marie Pédrot | 2021-03-13 14:32:13 +0100 |
|---|---|---|
| committer | Pierre-Marie Pédrot | 2021-03-13 14:40:49 +0100 |
| commit | 754dc0848ac5c48fc92363a6c2acc7f6ada76e32 (patch) | |
| tree | 18ec5bfb096be0a1bcc4f283fd8cc116034b9b07 /test-suite | |
| parent | 50654a3c660b9e39f7e9d2426b0b53afc48138c5 (diff) | |
Allow scope delimiters in Ltac2 open_constr:(...) quotation.
Fixes #12806: Ltac2 Notation's open_constr should accept scope stacks.
Diffstat (limited to 'test-suite')
| -rw-r--r-- | test-suite/bugs/closed/bug_12806.v | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/test-suite/bugs/closed/bug_12806.v b/test-suite/bugs/closed/bug_12806.v new file mode 100644 index 0000000000..ee221d33a6 --- /dev/null +++ b/test-suite/bugs/closed/bug_12806.v @@ -0,0 +1,9 @@ +Require Import Ltac2.Ltac2. + +Declare Scope my_scope. +Delimit Scope my_scope with my_scope. + +Notation "###" := tt : my_scope. + +Ltac2 Notation "bar" c(open_constr(my_scope)) := c. +Ltac2 Eval bar ###. |