diff options
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/g_tactic.ml4 | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/parsing/g_tactic.ml4 b/parsing/g_tactic.ml4 index 5ffabbcf55..4b9d223ad7 100644 --- a/parsing/g_tactic.ml4 +++ b/parsing/g_tactic.ml4 @@ -476,12 +476,8 @@ GEXTEND Gram | -> None ] ] ; or_and_intropattern_loc: - [ [ ipat = or_and_intropattern -> !@loc, ipat - | id = ident -> - !@loc, - (* coding, see tacinterp.ml: *) - [[Loc.ghost, IntroNaming (IntroIdentifier id)]] - ] ] + [ [ ipat = or_and_intropattern -> ArgArg (!@loc,ipat) + | locid = identref -> ArgVar locid ] ] ; as_or_and_ipat: [ [ "as"; ipat = or_and_intropattern_loc -> Some ipat |