summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2014-05-05 19:37:58 -0600
committerKarl Williamson <khw@cpan.org>2014-05-31 11:37:24 -0600
commite123187a1c7666bc2bf1eab209057d9d3fe83f66 (patch)
treecda33288db40b7a4d67d3717588294e2b6bdd465 /proto.h
parent91e83b736b8e78a0acc723337e6e9a57ac548ef5 (diff)
downloadperl-e123187a1c7666bc2bf1eab209057d9d3fe83f66.tar.gz
utf8.c: Move a static function to inline.h
This is in preparation for it being called from outside utf8.c. It is renamed to have a leading underscore to emphasize its private nature
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h12
1 files changed, 6 insertions, 6 deletions
diff --git a/proto.h b/proto.h
index 06a31e38fe..2d50a7518d 100644
--- a/proto.h
+++ b/proto.h
@@ -57,6 +57,12 @@ PERL_CALLCONV bool Perl__is_utf8_FOO(pTHX_ const U8 classnum, const U8 *p)
#define PERL_ARGS_ASSERT__IS_UTF8_FOO \
assert(p)
+PERL_STATIC_INLINE STRLEN S__is_utf8_char_slow(const U8 *s, const STRLEN len)
+ __attribute__warn_unused_result__
+ __attribute__nonnull__(1);
+#define PERL_ARGS_ASSERT__IS_UTF8_CHAR_SLOW \
+ assert(s)
+
PERL_CALLCONV bool Perl__is_utf8_mark(pTHX_ const U8 *p)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1);
@@ -7692,12 +7698,6 @@ STATIC UV S_check_locale_boundary_crossing(pTHX_ const U8* const p, const UV res
#define PERL_ARGS_ASSERT_CHECK_LOCALE_BOUNDARY_CROSSING \
assert(p); assert(ustrp); assert(lenp)
-PERL_STATIC_INLINE STRLEN S_is_utf8_char_slow(const U8 *s, const STRLEN len)
- __attribute__warn_unused_result__
- __attribute__nonnull__(1);
-#define PERL_ARGS_ASSERT_IS_UTF8_CHAR_SLOW \
- assert(s)
-
PERL_STATIC_INLINE bool S_is_utf8_common(pTHX_ const U8 *const p, SV **swash, const char * const swashname, SV* const invlist)
__attribute__warn_unused_result__
__attribute__nonnull__(pTHX_1)