add verbose stack display option, -Dvs

[p5sagit/p5-mst-13.2.git] / embed.fnc

diff --git a/embed.fnc b/embed.fnc
index a2c83b5..af9961e 100644 (file)
--- a/embed.fnc
+++ b/embed.fnc
@@ -1359,5 +1359,12 @@ Ap       |PerlIO *|PerlIO_stdout
 Ap     |PerlIO *|PerlIO_stderr
 #endif /* PERLIO_LAYERS */
 
+p      |void   |deb_stack_all
+#ifdef PERL_IN_DEB_C
+s      |void   |deb_stack_n    |SV** stack_base, I32 stack_min, \
+                                I32 stack_max, I32 mark_min, I32 mark_max
+#endif
+
+
 END_EXTERN_C