perlapi: Document debstack

2 files changed, 8 insertions, 2 deletions

diff --git a/deb.c b/deb.c
index f8eee189b0..3b42ca1a9d 100644
--- a/deb.c
+++ b/deb.c
@@ -157,7 +157,13 @@ S_deb_stack_n(pTHX_ SV** stack_base, I32 stack_min, I32 stack_max,
 }
 
 
-/* dump the current stack */
+/*
+=for apidoc debstack
+
+Dump the current stack
+
+=cut
+*/
 
 I32
 Perl_debstack(pTHX)
diff --git a/embed.fnc b/embed.fnc
index aafb2147c9..59c0e69784 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -760,7 +760,7 @@ Cpd	|void	|debprofdump
 EXp	|SV*	|multideref_stringify	|NN const OP* o|NULLOK CV *cv
 EXp	|SV*	|multiconcat_stringify	|NN const OP* o
 Cpd	|I32	|debop		|NN const OP* o
-Ap	|I32	|debstack
+Apd	|I32	|debstack
 Cp	|I32	|debstackptrs
 pR	|SV *	|defelem_target	|NN SV *sv|NULLOK MAGIC *mg
 ATpd	|char*	|delimcpy|NN char* to|NN const char* to_end		\