diff options
author | Karl Williamson <khw@cpan.org> | 2015-05-08 15:19:56 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2015-09-08 10:05:56 -0600 |
commit | bbc981342c254b86d5bc82e5175169b68f0e59ce (patch) | |
tree | c9ab53c77f73c5b04d08123a908d3ba03ed59934 /perl.h | |
parent | 5d1187d1639ce42a8a9283c8282136fa16d41e50 (diff) | |
download | perl-bbc981342c254b86d5bc82e5175169b68f0e59ce.tar.gz |
Add more -DL debugging info
This adds more stuff that gets dumped when debugging locale handling.
And it adds even more when the v modifier appears.
Diffstat (limited to 'perl.h')
-rw-r--r-- | perl.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -4055,6 +4055,7 @@ Gid_t getegid (void); # define DEBUG_Xv_TEST_ (DEBUG_X_TEST_ && DEBUG_v_TEST_) # define DEBUG_Uv_TEST_ (DEBUG_U_TEST_ && DEBUG_v_TEST_) # define DEBUG_Pv_TEST_ (DEBUG_P_TEST_ && DEBUG_v_TEST_) +# define DEBUG_Lv_TEST_ (DEBUG_L_TEST_ && DEBUG_v_TEST_) #ifdef DEBUGGING @@ -4088,6 +4089,7 @@ Gid_t getegid (void); # define DEBUG_Xv_TEST DEBUG_Xv_TEST_ # define DEBUG_Uv_TEST DEBUG_Uv_TEST_ # define DEBUG_Pv_TEST DEBUG_Pv_TEST_ +# define DEBUG_Lv_TEST DEBUG_Lv_TEST_ # define PERL_DEB(a) a # define PERL_DEB2(a,b) a @@ -4127,6 +4129,7 @@ Gid_t getegid (void); # define DEBUG_Xv(a) DEBUG__(DEBUG_Xv_TEST, a) # define DEBUG_Uv(a) DEBUG__(DEBUG_Uv_TEST, a) # define DEBUG_Pv(a) DEBUG__(DEBUG_Pv_TEST, a) +# define DEBUG_Lv(a) DEBUG__(DEBUG_Lv_TEST, a) # define DEBUG_S(a) DEBUG__(DEBUG_S_TEST, a) # define DEBUG_T(a) DEBUG__(DEBUG_T_TEST, a) @@ -4171,6 +4174,7 @@ Gid_t getegid (void); # define DEBUG_Xv_TEST (0) # define DEBUG_Uv_TEST (0) # define DEBUG_Pv_TEST (0) +# define DEBUG_Lv_TEST (0) # define PERL_DEB(a) # define PERL_DEB2(a,b) b @@ -4204,6 +4208,7 @@ Gid_t getegid (void); # define DEBUG_Xv(a) # define DEBUG_Uv(a) # define DEBUG_Pv(a) +# define DEBUG_Lv(a) #endif /* DEBUGGING */ |