perlapi: Mark debstackptrs as internal

This is unused in Perl since at least Perl 5 Alpha, and unused in CPAN.

2 files changed, 2 insertions, 2 deletions

diff --git a/deb.c b/deb.c
index 8410e429bd..f8eee189b0 100644
--- a/deb.c
+++ b/deb.c
@@ -79,7 +79,7 @@ Perl_vdeb(pTHX_ const char *pat, va_list *args)
 }
 
 I32
-Perl_debstackptrs(pTHX)
+Perl_debstackptrs(pTHX)     /* Currently unused in cpan and core */
 {
 #ifdef DEBUGGING
     PerlIO_printf(Perl_debug_log,
diff --git a/embed.fnc b/embed.fnc
index 1c59fa764a..aafb2147c9 100644
--- a/embed.fnc
+++ b/embed.fnc
@@ -761,7 +761,7 @@ 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
-Ap	|I32	|debstackptrs
+Cp	|I32	|debstackptrs
 pR	|SV *	|defelem_target	|NN SV *sv|NULLOK MAGIC *mg
 ATpd	|char*	|delimcpy|NN char* to|NN const char* to_end		\
 			 |NN const char* from|NN const char* from_end	\