[perl #58718] [BUG] Assigning result of "WHAT" to Perl6Scalar makes wrong result.

[via RT]

# New Ticket Created by  Vasily Chekalkin 
# Please include the string:  [perl #58718]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=58718 >


Hello.

During investigating bug from #58276 I found very nasty bug with 
assigning to Perl6Scalar.

.sub "main"
.include "interpinfo.pasm"
     load_bytecode "perl6.pbc"
     $P0 = get_hll_global "List"
     $P1 = $P0."new"()
     $P2 = $P1."WHAT"()
     print "first "
     say $P2
     $P3 = new "Perl6Scalar"
     $P3."infix:="($P2)
     print "second "
     say $P3
     say "done"
.end

$ ../../parrot t4.pir
first List
second
done

-- 
Bacek.