diff options
author | Benjamin Sugars <bsugars@canoe.ca> | 2001-05-06 08:54:13 -0400 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-05-07 01:34:38 +0000 |
commit | 53a2efa2dc68a3abcc2483f05bd06213caea8bbd (patch) | |
tree | 0bf40d9ffc9f9b06c3921ed36fe4478a5cb8ca97 /embed.h | |
parent | 9969eac4caad73a7363479eb01ac114ae3164fac (diff) | |
download | perl-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.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -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 |