summaryrefslogtreecommitdiff
path: root/t/pragma
diff options
context:
space:
mode:
authorIlya Zakharevich <ilya@math.berkeley.edu>2000-12-15 00:26:57 -0500
committerJarkko Hietaniemi <jhi@iki.fi>2000-12-15 15:38:30 +0000
commit32251b26ec0781f53d9925938cad5bd9e89c80f2 (patch)
treeb4e269ef285eacd12a1e4b19ce557bccc7c14590 /t/pragma
parent89ffc314668a83ba2b452e1498a0e37c4453876e (diff)
downloadperl-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-xt/pragma/overload.t1
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] } ) ];