summaryrefslogtreecommitdiff
path: root/proto.h
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2012-08-24 14:20:41 -0600
committerKarl Williamson <public@khwilliamson.com>2012-08-25 23:21:29 -0600
commit6dd9dce957a17e45449a2fa4e684b1b241302529 (patch)
treea17956874a5fa99f8b4e2f5f4512c3f3880095bc /proto.h
parent83199d386f82b5fcc56cdeded547bf6bad800018 (diff)
downloadperl-6dd9dce957a17e45449a2fa4e684b1b241302529.tar.gz
embed.fnc: Turn null wrapper function into macro
This function only does something on EBCDIC platforms. On ASCII ones make it a macro, like similar ones to avoid useless function nesting
Diffstat (limited to 'proto.h')
-rw-r--r--proto.h15
1 files changed, 10 insertions, 5 deletions
diff --git a/proto.h b/proto.h
index 32ba9691ce..4e99a85edc 100644
--- a/proto.h
+++ b/proto.h
@@ -4639,11 +4639,6 @@ PERL_CALLCONV U8* Perl_uvuni_to_utf8_flags(pTHX_ U8 *d, UV uv, UV flags)
#define PERL_ARGS_ASSERT_UVUNI_TO_UTF8_FLAGS \
assert(d)
-PERL_CALLCONV UV Perl_valid_utf8_to_uvchr(pTHX_ const U8 *s, STRLEN *retlen)
- __attribute__nonnull__(pTHX_1);
-#define PERL_ARGS_ASSERT_VALID_UTF8_TO_UVCHR \
- assert(s)
-
PERL_CALLCONV UV Perl_valid_utf8_to_uvuni(pTHX_ const U8 *s, STRLEN *retlen)
__attribute__nonnull__(pTHX_1);
#define PERL_ARGS_ASSERT_VALID_UTF8_TO_UVUNI \
@@ -4836,6 +4831,11 @@ STATIC int S_sv_2iuv_non_preserve(pTHX_ SV *const sv)
#define PERL_ARGS_ASSERT_UVCHR_TO_UTF8 \
assert(d)
+/* PERL_CALLCONV UV Perl_valid_utf8_to_uvchr(pTHX_ const U8 *s, STRLEN *retlen)
+ __attribute__nonnull__(pTHX_1); */
+#define PERL_ARGS_ASSERT_VALID_UTF8_TO_UVCHR \
+ assert(s)
+
#endif
#if !(defined(HAS_SIGACTION) && defined(SA_SIGINFO))
PERL_CALLCONV Signal_t Perl_csighandler(int sig);
@@ -5170,6 +5170,11 @@ PERL_CALLCONV U8* Perl_uvchr_to_utf8(pTHX_ U8 *d, UV uv)
#define PERL_ARGS_ASSERT_UVCHR_TO_UTF8 \
assert(d)
+PERL_CALLCONV UV Perl_valid_utf8_to_uvchr(pTHX_ const U8 *s, STRLEN *retlen)
+ __attribute__nonnull__(pTHX_1);
+#define PERL_ARGS_ASSERT_VALID_UTF8_TO_UVCHR \
+ assert(s)
+
#endif
#if defined(HAS_MSG) || defined(HAS_SEM) || defined(HAS_SHM)
PERL_CALLCONV I32 Perl_do_ipcctl(pTHX_ I32 optype, SV** mark, SV** sp)