summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-07-24 07:28:35 -0600
committerKarl Williamson <khw@cpan.org>2021-07-30 06:11:46 -0600
commite1d42b06fe086972476d94f919b4ea82221d554b (patch)
tree71f50cf26e1d0fb7208c62554115ccab0d131bc9 /toke.c
parented17be2e04b135c5cd087a41888af295a863b9c5 (diff)
downloadperl-e1d42b06fe086972476d94f919b4ea82221d554b.tar.gz
toke.c: Save a '&' instr by casting to U8
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index 18e342efd5..e6f7a3a42f 100644
--- a/toke.c
+++ b/toke.c
@@ -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++;