diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2002-09-26 00:40:23 +0100 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-10-02 12:55:29 +0000 |
| commit | dd2155a49b710f23bc6d72169e5b1d71d8b3aa03 (patch) | |
| tree | 7fd660a6b57a1893830c91b566975bbe7e085966 /perl.h | |
| parent | 78c9d76351ef2d0f7047846bbf29e303753d3fda (diff) | |
| download | perl-dd2155a49b710f23bc6d72169e5b1d71d8b3aa03.tar.gz | |
move all pad-related code to its own src file
Message-ID: <20020925234023.A20044@fdgroup.com>
p4raw-id: //depot/perl@17953
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 8 |
1 files changed, 6 insertions, 2 deletions
@@ -2264,6 +2264,7 @@ typedef struct crypt_data { /* straight from /usr/include/crypt.h */ #include "util.h" #include "form.h" #include "gv.h" +#include "pad.h" #include "cv.h" #include "opnames.h" #include "op.h" @@ -2512,6 +2513,7 @@ Gid_t getegid (void); # define DEBUG_J_TEST_ (PL_debug & DEBUG_J_FLAG) # define DEBUG_v_TEST_ (PL_debug & DEBUG_v_FLAG) # define DEBUG_C_TEST_ (PL_debug & DEBUG_C_FLAG) +# define DEBUG_Xv_TEST_ (DEBUG_X_TEST_ && DEBUG_v_TEST_) #ifdef DEBUGGING @@ -2532,6 +2534,7 @@ Gid_t getegid (void); # define DEBUG_u_TEST DEBUG_u_TEST_ # define DEBUG_H_TEST DEBUG_H_TEST_ # define DEBUG_X_TEST DEBUG_X_TEST_ +# define DEBUG_Xv_TEST DEBUG_Xv_TEST_ # define DEBUG_D_TEST DEBUG_D_TEST_ # define DEBUG_S_TEST DEBUG_S_TEST_ # define DEBUG_T_TEST DEBUG_T_TEST_ @@ -2568,6 +2571,7 @@ Gid_t getegid (void); # define DEBUG_u(a) DEBUG__(DEBUG_u_TEST, a) # define DEBUG_H(a) DEBUG__(DEBUG_H_TEST, a) # define DEBUG_X(a) DEBUG__(DEBUG_X_TEST, a) +# define DEBUG_Xv(a) DEBUG__(DEBUG_Xv_TEST, a) # define DEBUG_D(a) DEBUG__(DEBUG_D_TEST, a) # ifdef USE_5005THREADS @@ -2597,6 +2601,7 @@ Gid_t getegid (void); # define DEBUG_u_TEST (0) # define DEBUG_H_TEST (0) # define DEBUG_X_TEST (0) +# define DEBUG_Xv_TEST (0) # define DEBUG_D_TEST (0) # define DEBUG_S_TEST (0) # define DEBUG_T_TEST (0) @@ -2621,6 +2626,7 @@ Gid_t getegid (void); # define DEBUG_u(a) # define DEBUG_H(a) # define DEBUG_X(a) +# define DEBUG_Xv(a) # define DEBUG_D(a) # define DEBUG_S(a) # define DEBUG_T(a) @@ -2889,10 +2895,8 @@ typedef Sighandler_t Sigsave_t; # ifndef register # define register # endif -# define PAD_SV(po) pad_sv(po) # define RUNOPS_DEFAULT Perl_runops_debug #else -# define PAD_SV(po) PL_curpad[po] # define RUNOPS_DEFAULT Perl_runops_standard #endif |