diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 1998-07-20 17:40:00 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-08-02 06:16:03 +0000 |
| commit | 8b73bbec3102cdf25a35c954eb1aab85acc07808 (patch) | |
| tree | 52e125d1fa92882b072415b5ac465a817f731bc7 /perl.h | |
| parent | bd869e3a5834bd5d26dd079fef07f5c567f6ca97 (diff) | |
| download | perl-8b73bbec3102cdf25a35c954eb1aab85acc07808.tar.gz | |
tweaked version of suggested patch
Message-Id: <199807210140.VAA17186@monk.mps.ohio-state.edu>
Subject: [PATCH 5.004_75] Enable -DS
p4raw-id: //depot/maint-5.005/perl@1701
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 8 |
1 files changed, 7 insertions, 1 deletions
@@ -1443,6 +1443,11 @@ Gid_t getegid _((void)); #define DEBUG_H(a) if (PL_debug & 8192) a #define DEBUG_X(a) if (PL_debug & 16384) a #define DEBUG_D(a) if (PL_debug & 32768) a +# ifdef USE_THREADS +# define DEBUG_S(a) if (PL_debug & (1<<16)) a +# else +# define DEBUG_S(a) +# endif #else #define DEB(a) #define DEBUG(a) @@ -1458,10 +1463,11 @@ Gid_t getegid _((void)); #define DEBUG_r(a) #define DEBUG_x(a) #define DEBUG_u(a) -#define DEBUG_L(a) +#define DEBUG_S(a) #define DEBUG_H(a) #define DEBUG_X(a) #define DEBUG_D(a) +#define DEBUG_S(a) #endif #define YYMAXDEPTH 300 |