summaryrefslogtreecommitdiff
path: root/embed.h
diff options
context:
space:
mode:
authorBenjamin Sugars <bsugars@canoe.ca>2001-05-06 08:54:13 -0400
committerJarkko Hietaniemi <jhi@iki.fi>2001-05-07 01:34:38 +0000
commit53a2efa2dc68a3abcc2483f05bd06213caea8bbd (patch)
tree0bf40d9ffc9f9b06c3921ed36fe4478a5cb8ca97 /embed.h
parent9969eac4caad73a7363479eb01ac114ae3164fac (diff)
downloadperl-53a2efa2dc68a3abcc2483f05bd06213caea8bbd.tar.gz
Help -Dt show correct pad variables
Message-ID: <Pine.LNX.4.21.0105061142040.12858-100000@localhost.localdomain> p4raw-id: //depot/perl@10015
Diffstat (limited to 'embed.h')
-rw-r--r--embed.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/embed.h b/embed.h
index dd5d658969..ff6ffee0cb 100644
--- a/embed.h
+++ b/embed.h
@@ -1053,6 +1053,7 @@
#define find_byclass S_find_byclass
#endif
#if defined(PERL_IN_RUN_C) || defined(PERL_DECL_PROT)
+#define deb_curcv S_deb_curcv
#define debprof S_debprof
#endif
#if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT)
@@ -2539,6 +2540,7 @@
#define find_byclass(a,b,c,d,e,f) S_find_byclass(aTHX_ a,b,c,d,e,f)
#endif
#if defined(PERL_IN_RUN_C) || defined(PERL_DECL_PROT)
+#define deb_curcv(a) S_deb_curcv(aTHX_ a)
#define debprof(a) S_debprof(aTHX_ a)
#endif
#if defined(PERL_IN_SCOPE_C) || defined(PERL_DECL_PROT)
@@ -4945,6 +4947,8 @@
#define find_byclass S_find_byclass
#endif
#if defined(PERL_IN_RUN_C) || defined(PERL_DECL_PROT)
+#define S_deb_curcv CPerlObj::S_deb_curcv
+#define deb_curcv S_deb_curcv
#define S_debprof CPerlObj::S_debprof
#define debprof S_debprof
#endif