From de61950ae56ef8b3703b4fd7a5fd7fea866f893c Mon Sep 17 00:00:00 2001 From: David Mitchell Date: Sun, 10 Oct 2010 19:48:23 +0100 Subject: [PATCH] stop DEBUG_LEAKING_SCALARS, er, leaking! When cloning an SV, new_SV() was setting sv_debug_file, then we immediately set it again without freeing the first one. --- sv.c | 1 + 1 file changed, 1 insertion(+) diff --git a/sv.c b/sv.c index abb4f32..84f3ab1 100644 --- a/sv.c +++ b/sv.c @@ -11404,6 +11404,7 @@ S_sv_dup_common(pTHX_ const SV *const sstr, CLONE_PARAMS *const param) dstr->sv_debug_line = sstr->sv_debug_line; dstr->sv_debug_inpad = sstr->sv_debug_inpad; dstr->sv_debug_parent = (SV*)sstr; + FREE_SV_DEBUG_FILE(dstr); dstr->sv_debug_file = savepv(sstr->sv_debug_file); #endif -- 1.8.3.1