summaryrefslogtreecommitdiff
path: root/embed.fnc
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2005-06-24 14:04:19 +0000
committerNicholas Clark <nick@ccl4.org>2005-06-24 14:04:19 +0000
commit41e4abd8e288135291940b1765c485a707618c20 (patch)
treeb1e95b031dfc808c4998264e298d095bc7572532 /embed.fnc
parentc80263a809faf4e39544f5f3f44ed7181a92391b (diff)
downloadperl-41e4abd8e288135291940b1765c485a707618c20.tar.gz
Extend DEBUG_LEAKING_SCALARS_FORK_DUMP so it can also dump scalars
which become unreferenced. This is less likely to be successful. The #define needs a better name. p4raw-id: //depot/perl@24976
Diffstat (limited to 'embed.fnc')
-rw-r--r--embed.fnc4
1 files changed, 4 insertions, 0 deletions
diff --git a/embed.fnc b/embed.fnc
index a9b5afb510..d5f44f3a67 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -1517,6 +1517,10 @@ dpR |bool |is_gv_magical_sv|SV *name|U32 flags
ApR |bool |stashpv_hvname_match|NN const COP *cop|NN const HV *hv
+#ifdef DEBUG_LEAKING_SCALARS_FORK_DUMP
+p |void |dump_sv_child |SV *sv
+#endif
+
END_EXTERN_C
/*
* ex: set ts=8 sts=4 sw=4 noet: