perlapi: Mark debprofdump internal and document it

Also document debprof.

These are used only to implement the -DP perl command line option.

1 files changed, 18 insertions, 0 deletions

diff --git a/dump.c b/dump.c
index 9197d636a7..f3ab011703 100644
--- a/dump.c
+++ b/dump.c
@@ -3163,6 +3163,15 @@ Perl_watch(pTHX_ char **addr)
         PTR2UV(PL_watchaddr), PTR2UV(PL_watchok));
 }
 
+/*
+=for apidoc debprof
+
+Called to indicate that C<o> was executed, for profiling purposes under the
+C<-DP> command line option.
+
+=cut
+*/
+
 STATIC void
 S_debprof(pTHX_ const OP *o)
 {
@@ -3175,6 +3184,15 @@ S_debprof(pTHX_ const OP *o)
     ++PL_profiledata[o->op_type];
 }
 
+/*
+=for apidoc debprofdump
+
+Dumps the contents of the data collected by the C<-DP> perl command line
+option.
+
+=cut
+*/
+
 void
 Perl_debprofdump(pTHX)
 {