diff options
author | Lukas Mai <l.mai@web.de> | 2016-10-16 03:03:23 +0200 |
---|---|---|
committer | Lukas Mai <l.mai@web.de> | 2016-10-20 12:41:12 +0200 |
commit | 08ec993641fc392ebbdcbfa6ddecbd8373475d52 (patch) | |
tree | 362b386a1ab478bb5f1c1b0f5904d72a1bd737da /toke.c | |
parent | 3cc6a05eedade6f51526feb18c12356b0589d77a (diff) | |
download | perl-08ec993641fc392ebbdcbfa6ddecbd8373475d52.tar.gz |
toke.c: get rid of "if (0)"
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 4 |
1 files changed, 1 insertions, 3 deletions
@@ -6907,12 +6907,10 @@ Perl_yylex(pTHX) reserved_word: switch (tmp) { - default: /* not a keyword */ /* Trade off - by using this evil construction we can pull the variable gv into the block labelled keylookup. If not, then we have to give it function scope so that the goto from the earlier ':' case doesn't bypass the initialisation. */ - if (0) { just_a_word_zero_gv: sv = NULL; cv = NULL; @@ -6922,7 +6920,7 @@ Perl_yylex(pTHX) orig_keyword = 0; lex = 0; off = 0; - } + default: /* not a keyword */ just_a_word: { int pkgname = 0; const char lastchar = (PL_bufptr == PL_oldoldbufptr ? 0 : PL_bufptr[-1]); |