Skip to content

Commit

Permalink
Fix handling of 8 digit hex literals in 32bit rakudos
Browse files Browse the repository at this point in the history
They don't always fit into 31bits.
  • Loading branch information
pmurias committed Apr 25, 2017
1 parent 3961073 commit 0b8270a
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion src/Perl6/Actions.nqp
Expand Up @@ -7376,7 +7376,7 @@ class Perl6::Actions is HLL::Actions does STDActions {
}
method hexint($/) {
my int $chars := nqp::chars($/);
make $chars > ($?BITS == 64 ?? 14 !! 8)
make $chars > ($?BITS == 64 ?? 14 !! 7)
?? string_to_bigint($/, 16, $chars)
!! string_to_int($/, 16, $chars);
}
Expand Down

0 comments on commit 0b8270a

Please sign in to comment.