diff options
| author |  Enrico Tassi <gareuselesinge@debian.org> | 2016-01-26 16:56:34 +0100 |
|---|---|---|
| committer | Enrico Tassi <gareuselesinge@debian.org> | 2016-01-26 16:56:34 +0100 |
| commit | bb08c29807439697fa7c2045000dd3e17a9428b1 (patch) | |
| tree | 9100a2dd5c2cb92ddd083cb052e236cdee6b9690 /test-suite/bugs/opened/3278.v | |
| parent | d55ac4014632489e3009a2a7351d018b3b2d27ac (diff) | |
| parent | 164c6861860e6b52818c031f901ffeff91fca16a (diff) | |
Merge tag 'upstream/8.5'
Upstream version 8.5
Diffstat (limited to 'test-suite/bugs/opened/3278.v')
| -rw-r--r-- | test-suite/bugs/opened/3278.v | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/test-suite/bugs/opened/3278.v b/test-suite/bugs/opened/3278.v index ced535af..1c6deae9 100644 --- a/test-suite/bugs/opened/3278.v +++ b/test-suite/bugs/opened/3278.v @@ -1,8 +1,8 @@ Module a. Check let x' := _ in - $(exact x')$. + ltac:(exact x'). - Notation foo x := (let x' := x in $(exact x')$). + Notation foo x := (let x' := x in ltac:(exact x')). Fail Check foo _. (* Error: Cannot infer an internal placeholder of type "Type" in environment: @@ -12,10 +12,10 @@ x' := ?42 : ?41 End a. Module b. - Notation foo x := (let x' := x in let y := ($(exact I)$ : True) in I). + Notation foo x := (let x' := x in let y := (ltac:(exact I) : True) in I). Notation bar x := (let x' := x in let y := (I : True) in I). - Check let x' := _ in $(exact I)$. (* let x' := ?5 in I *) + Check let x' := _ in ltac:(exact I). (* let x' := ?5 in I *) Check bar _. (* let x' := ?9 in let y := I in I *) Fail Check foo _. (* Error: Cannot infer an internal placeholder of type "Type" in environment: |