diff options
| author | Karl Williamson <public@khwilliamson.com> | 2011-11-19 16:50:33 -0700 |
|---|---|---|
| committer | Karl Williamson <public@khwilliamson.com> | 2012-01-13 09:58:33 -0700 |
| commit | b0e3252edb68bc2dd1e28347ff032f53358df3ce (patch) | |
| tree | c61f9d3de3ab5eafae2f2bfb36072b24255949a4 /proto.h | |
| parent | 20b1a8918cf079bce8353cc51059b0ff48ed4ad6 (diff) | |
| download | perl-b0e3252edb68bc2dd1e28347ff032f53358df3ce.tar.gz | |
utf8.c: Change name of static function
This function has always confused me, as it doesn't return a swash, but
a swatch.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -7079,10 +7079,10 @@ STATIC bool S_is_utf8_common(pTHX_ const U8 *const p, SV **swash, const char * c #define PERL_ARGS_ASSERT_IS_UTF8_COMMON \ assert(p); assert(swash); assert(swashname) -STATIC SV* S_swash_get(pTHX_ SV* swash, UV start, UV span) +STATIC SV* S_swatch_get(pTHX_ SV* swash, UV start, UV span) __attribute__warn_unused_result__ __attribute__nonnull__(pTHX_1); -#define PERL_ARGS_ASSERT_SWASH_GET \ +#define PERL_ARGS_ASSERT_SWATCH_GET \ assert(swash) STATIC U8 S_to_lower_latin1(pTHX_ const U8 c, U8 *p, STRLEN *lenp) |