Skip to content
Permalink
Browse files

Fix constants getting added in hash order

  • Loading branch information...
niner committed May 1, 2019
1 parent 5dcc687 commit aa1d1ce08e071726907401ae81ade500486c6c5b
Showing with 3 additions and 3 deletions.
  1. +3 −3 src/Perl6/World.nqp
@@ -2864,9 +2864,9 @@ class Perl6::World is HLL::World {
my str $cache_key;
if !$nocache {
my str $namedkey := '';
for %named {
$namedkey := $namedkey ~ $_.key ~ ',' ~ $_.value ~ ';'
if nqp::defined($_.value);
for sorted_keys(%named) -> $key {
$namedkey := $namedkey ~ $key ~ ',' ~ %named{$key} ~ ';'
if nqp::defined(%named{$key});
}
if $primitive eq 'bigint' {
$cache_key := "$type,bigint," ~ nqp::tostr_I(@value[0]);

0 comments on commit aa1d1ce

Please sign in to comment.
You can’t perform that action at this time.