This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
18f651c
)
stop DEBUG_LEAKING_SCALARS producing spurious memory pool errors
author
Dave Mitchell
<davem@fdisolutions.com>
Mon, 2 Jan 2006 21:50:55 +0000
(21:50 +0000)
committer
Dave Mitchell
<davem@fdisolutions.com>
Mon, 2 Jan 2006 21:50:55 +0000
(21:50 +0000)
(change #25775 wasn't complete)
p4raw-link: @25775 on //depot/perl:
22162ca81623f0ce6683af5e97b91bf10ad89079
p4raw-id: //depot/perl@26587
sv.c
patch
|
blob
|
blame
|
history
diff --git
a/sv.c
b/sv.c
index
016cad5
..
9cc9c37
100644
(file)
--- a/
sv.c
+++ b/
sv.c
@@
-9333,11
+9333,7
@@
Perl_sv_dup(pTHX_ const SV *sstr, CLONE_PARAMS* param)
dstr->sv_debug_line = sstr->sv_debug_line;
dstr->sv_debug_inpad = sstr->sv_debug_inpad;
dstr->sv_debug_cloned = 1;
-# ifdef NETWARE
dstr->sv_debug_file = savepv(sstr->sv_debug_file);
-# else
- dstr->sv_debug_file = savesharedpv(sstr->sv_debug_file);
-# endif
#endif
ptr_table_store(PL_ptr_table, sstr, dstr);