diff options
| author | Karl Williamson <khw@cpan.org> | 2017-08-10 14:33:40 -0600 |
|---|---|---|
| committer | Karl Williamson <khw@cpan.org> | 2017-11-08 20:21:44 -0700 |
| commit | 63ab03b3966fa7dcc24a137305becdb56bbf4e5a (patch) | |
| tree | 5b9e408bc4a086edd7513da100415e28c73fce2d /proto.h | |
| parent | 604d7733597968dd3d3b15a0c50861ee7ade3f96 (diff) | |
| download | perl-63ab03b3966fa7dcc24a137305becdb56bbf4e5a.tar.gz | |
_byte_dump_string(): Don't output leading space
This changes this function to not put an initial space character in the
returned string.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -41,9 +41,9 @@ PERL_CALLCONV void* Perl_Slab_Alloc(pTHX_ size_t sz) PERL_CALLCONV void Perl_Slab_Free(pTHX_ void *op); #define PERL_ARGS_ASSERT_SLAB_FREE \ assert(op) -PERL_CALLCONV char * Perl__byte_dump_string(pTHX_ const U8 * s, const STRLEN len, const bool format); +PERL_CALLCONV char * Perl__byte_dump_string(pTHX_ const U8 * const start, const STRLEN len, const bool format); #define PERL_ARGS_ASSERT__BYTE_DUMP_STRING \ - assert(s) + assert(start) PERL_CALLCONV void Perl__force_out_malformed_utf8_message(pTHX_ const U8 *const p, const U8 * const e, const U32 flags, const bool die_here); #define PERL_ARGS_ASSERT__FORCE_OUT_MALFORMED_UTF8_MESSAGE \ assert(p); assert(e) |