diff options
author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2000-12-15 00:26:57 -0500 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-12-15 15:38:30 +0000 |
commit | 32251b26ec0781f53d9925938cad5bd9e89c80f2 (patch) | |
tree | b4e269ef285eacd12a1e4b19ce557bccc7c14590 /t/pragma | |
parent | 89ffc314668a83ba2b452e1498a0e37c4453876e (diff) | |
download | perl-32251b26ec0781f53d9925938cad5bd9e89c80f2.tar.gz |
speeding up object creation/destruction 4x times
Message-ID: <20001215052657.A8319@math.mps.ohio-state.edu>
p4raw-id: //depot/perl@8131
Diffstat (limited to 't/pragma')
-rwxr-xr-x | t/pragma/overload.t | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/t/pragma/overload.t b/t/pragma/overload.t index c7105dc9ca..bf24c07ec9 100755 --- a/t/pragma/overload.t +++ b/t/pragma/overload.t @@ -133,6 +133,7 @@ test ( $a eq "087"); # 29 test ( $b eq "88"); # 30 test (ref $a eq "Oscalar"); # 31 +undef $b; # Destroying updates tables too... eval q[package Oscalar; use overload ('++' => sub { $ {$_[0]} += 2; $_[0] } ) ]; |