diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-08-07 05:51:35 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-08-08 12:24:50 -0700 |
commit | aeaef3491d1eee1a07d91d03608fa86baf9dde40 (patch) | |
tree | f4d4c6cac136fd55fb52303a61f21fdfa3484db2 /toke.c | |
parent | f3f204dc630d5b7c057cde6dea93f281cb29251a (diff) | |
download | perl-aeaef3491d1eee1a07d91d03608fa86baf9dde40.tar.gz |
toke.c: Remove TOKENTYPE_GVVAL
It has been unused since it was added in bbf60fe6.
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -314,8 +314,7 @@ enum token_type { TOKENTYPE_IVAL, TOKENTYPE_OPNUM, /* pl_yylval.ival contains an opcode number */ TOKENTYPE_PVAL, - TOKENTYPE_OPVAL, - TOKENTYPE_GVVAL + TOKENTYPE_OPVAL }; static struct debug_tokens { @@ -431,7 +430,6 @@ S_tokereport(pTHX_ I32 rv, const YYSTYPE* lvalp) Perl_sv_catpvf(aTHX_ report, "?? %"IVdf, (IV)rv); switch (type) { case TOKENTYPE_NONE: - case TOKENTYPE_GVVAL: /* doesn't appear to be used */ break; case TOKENTYPE_IVAL: Perl_sv_catpvf(aTHX_ report, "(ival=%"IVdf")", (IV)lvalp->ival); |