This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
eval $undef should emit one warning, not three.
authorDave Mitchell <davem@fdisolutions.com>
Thu, 2 Nov 2006 17:07:00 +0000 (17:07 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Thu, 2 Nov 2006 17:07:00 +0000 (17:07 +0000)
commit0eb20fa22aa27beb10ebb64e033f5856e121ab29
tree9bc1595f686fd614966cda9e398f1b0b283019e2
parent0f7107a09d6f6792e3cad68e66112188b6aada14
eval $undef should emit one warning, not three.
Also ensure that eval $undef clears $@ (it did, but only by luck)

p4raw-id: //depot/perl@29193
pp_ctl.c
t/lib/warnings/9uninit
toke.c