diff options
| author | Karl Williamson <khw@cpan.org> | 2016-07-31 03:34:47 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2016-08-02 19:31:07 -0600 |
| commit | c7202deeaccd41c87be26607b12888eb48962016 (patch) | |
| tree | 0d4e92797e09ab2a128741d209d6e8c7a109a1d7 /proto.h | |
| parent | b07929e4d4792a3dd7676ea4ee1d84840f545b71 (diff) | |
| download | perl-c7202deeaccd41c87be26607b12888eb48962016.tar.gz | |
locale.c: Add some DEBUG statements
This also involves moving some complicated debugging statements to a
separate function so that it can be called from more than one place
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -4051,6 +4051,11 @@ PERL_CALLCONV char * Perl__setlocale_debug_string(const int category, const char __attribute__pure__; # endif +# if defined(USE_LOCALE) && defined(PERL_IN_LOCALE_C) +STATIC void S_print_collxfrm_input_and_return(pTHX_ const char * const s, const char * const e, const STRLEN * const xlen, const bool is_utf8); +#define PERL_ARGS_ASSERT_PRINT_COLLXFRM_INPUT_AND_RETURN \ + assert(s); assert(e) +# endif #endif #if defined(DEBUG_LEAKING_SCALARS_FORK_DUMP) PERL_CALLCONV void Perl_dump_sv_child(pTHX_ SV *sv); |