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

1 files changed, 4 insertions, 0 deletions

diff --git a/proto.h b/proto.h
index 36a0c41742..7b060cf0d3 100644
--- a/proto.h
+++ b/proto.h
@@ -2989,6 +2989,10 @@ PERL_CALLCONV bool	Perl_stashpv_hvname_match(pTHX_ const COP *cop, const HV *hv)
 			__attribute__nonnull__(pTHX_2);
 
 
+#ifdef DEBUG_LEAKING_SCALARS_FORK_DUMP
+PERL_CALLCONV void	Perl_dump_sv_child(pTHX_ SV *sv);
+#endif
+
 END_EXTERN_C
 /*
  * ex: set ts=8 sts=4 sw=4 noet: