diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-05-03 09:52:49 -0600 |
|---|---|---|
| committer | Jesse Vincent <jesse@bestpractical.com> | 2011-05-03 17:14:06 -0400 |
| commit | 7bee57f6d73fe07d73dd9b4a538e4ffd60c7eed8 (patch) | |
| tree | 3abff776f0a716ac976a5ddf252f0e2a5a9b434f /proto.h | |
| parent | a5eda76fc2190125cec66d38de6fa46913045ca0 (diff) | |
| download | perl-7bee57f6d73fe07d73dd9b4a538e4ffd60c7eed8.tar.gz | |
embed.fnc: Allow NULL arg to to_utf8_case()
Code within the function doesn't assume that the parameter is non-null,
and in fact the specials are retrieved by swash_init(). Having the
parameter null just means that no specials will be retrieved in the
current call.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 2 insertions, 3 deletions
@@ -4253,10 +4253,9 @@ PERL_CALLCONV UV Perl_to_utf8_case(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp, S __attribute__nonnull__(pTHX_1) __attribute__nonnull__(pTHX_2) __attribute__nonnull__(pTHX_4) - __attribute__nonnull__(pTHX_5) - __attribute__nonnull__(pTHX_6); + __attribute__nonnull__(pTHX_5); #define PERL_ARGS_ASSERT_TO_UTF8_CASE \ - assert(p); assert(ustrp); assert(swashp); assert(normal); assert(special) + assert(p); assert(ustrp); assert(swashp); assert(normal) PERL_CALLCONV UV Perl_to_utf8_fold(pTHX_ const U8 *p, U8* ustrp, STRLEN *lenp) __attribute__nonnull__(pTHX_1) |