diff options
author | Aaron Crane <arc@cpan.org> | 2019-10-23 22:00:47 +0100 |
---|---|---|
committer | Aaron Crane <arc@cpan.org> | 2019-11-04 10:32:29 +0000 |
commit | d333554320d1a704b62423d391bf751d61ee3e32 (patch) | |
tree | 1374fe03be1bd060fbd3fc57614520d999c0a055 /toke.c | |
parent | 6e93a30736704c0d33d0b91c818b0b6281615c73 (diff) | |
download | perl-d333554320d1a704b62423d391bf751d61ee3e32.tar.gz |
toke.c: remove some spurious orig_keyword uses
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 10 |
1 files changed, 4 insertions, 6 deletions
@@ -8410,8 +8410,8 @@ yyl_keylookup(pTHX_ char *s, GV *gv, bool bof, bool saw_infix_sigil) /* x::* is just a word, unless x is "CORE" */ if (!anydelim && *s == ':' && s[1] == ':') { if (memEQs(PL_tokenbuf, len, "CORE")) - return yyl_key_core(aTHX_ s, len, tmp, orig_keyword, c, bof, saw_infix_sigil); - return yyl_just_a_word(aTHX_ s, len, 0, orig_keyword, c, saw_infix_sigil); + return yyl_key_core(aTHX_ s, len, tmp, 0, c, bof, saw_infix_sigil); + return yyl_just_a_word(aTHX_ s, len, 0, 0, c, saw_infix_sigil); } d = s; @@ -8484,8 +8484,7 @@ yyl_keylookup(pTHX_ char *s, GV *gv, bool bof, bool saw_infix_sigil) if (!c.gv) { sv_free(c.sv); c.sv = NULL; - return yyl_just_a_word(aTHX_ s, len, tmp, orig_keyword, - c, saw_infix_sigil); + return yyl_just_a_word(aTHX_ s, len, tmp, 0, c, saw_infix_sigil); } } else { @@ -8494,8 +8493,7 @@ yyl_keylookup(pTHX_ char *s, GV *gv, bool bof, bool saw_infix_sigil) c.cv = find_lexical_cv(c.off); } c.lex = TRUE; - return yyl_just_a_word(aTHX_ s, len, tmp, orig_keyword, - c, saw_infix_sigil); + return yyl_just_a_word(aTHX_ s, len, tmp, 0, c, saw_infix_sigil); } c.off = 0; } |