[perl #43749] [TODO] Is the check in prederef() good enough?

[via RT]

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


In the file lib/Parrot/Pmc2c/StmRef.pm there is the todo item:

    if ( $self->does_write($name) ) {    # XXX is this good enough?

investigate if this *is* good enough, and if not, implement something better.