diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-18 04:23:12 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-07-18 04:23:12 +0000 |
| commit | 02270b4e1187bc8d0def222ae3fb78581e1dc745 (patch) | |
| tree | 3af6b9b70ffcbab12320fd78f064ea03a0b34a6c /t/op/vec.t | |
| parent | 5c7a8c7888175e16e13670318410610dcb21c26f (diff) | |
| download | perl-02270b4e1187bc8d0def222ae3fb78581e1dc745.tar.gz | |
fix lvalue leaks stemming from failure to free LvTARG(sv)
p4raw-id: //depot/perl@1528
Diffstat (limited to 't/op/vec.t')
| -rwxr-xr-x | t/op/vec.t | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/t/op/vec.t b/t/op/vec.t index 5ae224703a..71171447d6 100755 --- a/t/op/vec.t +++ b/t/op/vec.t @@ -4,8 +4,6 @@ print "1..15\n"; -$ENV{PERL_DESTRUCT_LEVEL} = 0; # XXX known to leaks scalars - print vec($foo,0,1) == 0 ? "ok 1\n" : "not ok 1\n"; print length($foo) == 0 ? "ok 2\n" : "not ok 2\n"; vec($foo,0,1) = 1; |