This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
fix for RT #8438: $tied->() doesn't call FETCH
authorDavid Mitchell <davem@iabyn.com>
Fri, 4 Jun 2010 22:09:21 +0000 (23:09 +0100)
committerDavid Mitchell <davem@iabyn.com>
Fri, 4 Jun 2010 22:25:16 +0000 (23:25 +0100)
commit7c75014e4b3bd5ebe368b5d6b981f310525d1389
tree37d8a950c789042c35934433fe70aca8b2377fc8
parentdfae30232f1b277231b0dee813acbeca0b958afd
fix for RT #8438: $tied->() doesn't call FETCH

pp_entersub checked for ROK *before* calling magic. If the tied scalar
already had ROK set (perhaps from a previous time), then get magic (and
hence FETCH) wasn't called.
lib/overload.t
pp_hot.c
t/op/tie.t