# New Ticket Created by Simon Glover
# Please include the string: [perl #33603]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org:80/rt3/Ticket/Display.html?id=33603 >
This code:
new P0, .Undef
new P1, .Undef
eq P0, P1, L1
print "not "
L1: print "ok\n"
end
prints "not ok". Should it? If Parrot considers every Undef PMC to
be distinct, it's going to make tasks like comparing arrays with
large numbers of undefined elements much fiddlier than it should be.
For instance, the fact that Undef != Undef means that this code:
new P0, .ResizablePMCArray
set P0, 1
clone P1, P0
eq P0, P1, L1
print "not "
L1: print "ok"
print "\n"
end
prints "not ok".
Simon
