diff options
author | Karl Williamson <khw@cpan.org> | 2021-07-24 07:28:35 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2021-07-30 06:11:46 -0600 |
commit | e1d42b06fe086972476d94f919b4ea82221d554b (patch) | |
tree | 71f50cf26e1d0fb7208c62554115ccab0d131bc9 /toke.c | |
parent | ed17be2e04b135c5cd087a41888af295a863b9c5 (diff) | |
download | perl-e1d42b06fe086972476d94f919b4ea82221d554b.tar.gz |
toke.c: Save a '&' instr by casting to U8
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -9283,7 +9283,7 @@ Perl_yylex(pTHX) if (PL_lex_brackets > 100) Renew(PL_lex_brackstack, PL_lex_brackets + 10, char); PL_lex_brackstack[PL_lex_brackets++] = - (char) ((next_type >> 16) & 0xff); + (char) ((U8) (next_type >> 16)); } if (next_type & (2<<24)) PL_lex_allbrackets++; |