Skip to content
Permalink
Browse files

Fix adding object to BagHash after it having been removed

This was a forgotten fix from the previous commit
  • Loading branch information...
lizmat committed Mar 21, 2019
1 parent 6365798 commit c5664301b80078768637cf7e349e9bfb0724d548
Showing with 6 additions and 5 deletions.
  1. +6 −5 src/core/BagHash.pm6
@@ -142,7 +142,7 @@ my class BagHash does Baggy {
# processing.
nqp::stmts(
# save object for potential recreation
(my $object := nqp::atkey(elems,$key)),
(my $pair := nqp::atkey(elems,$key)),

Proxy.new(
FETCH => {
@@ -173,10 +173,11 @@ my class BagHash does Baggy {
),
nqp::if( # where did it go?
nqp::isgt_i($value,0),
nqp::bindkey(
elems,
$key,
Pair.new($object,nqp::decont($value))
nqp::bindattr(
nqp::bindkey(elems,$key,$pair),
Pair,
'$!value',
nqp::decont($value)
)
)
)

0 comments on commit c566430

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