summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2006-08-17 22:16:09 +0300
committerSteve Peters <steve@fisharerojo.org>2006-08-17 20:28:36 +0000
commita0c21aa16d2e2969e7469365a39ad48179751e84 (patch)
treea91a58eecb71088ce15c80e1d7cf743e728161b2 /utf8.c
parentc45598c5c02384ee183c07ababc5e058b2284e17 (diff)
downloadperl-a0c21aa16d2e2969e7469365a39ad48179751e84.tar.gz
Re: A large-ish C++ TODO (Re: [PATCH] g++ stage 1 reached)
Message-ID: <44E49649.9090307@iki.fi> p4raw-id: //depot/perl@28734
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c7
1 files changed, 7 insertions, 0 deletions
diff --git a/utf8.c b/utf8.c
index 21be126342..f3e36337bd 100644
--- a/utf8.c
+++ b/utf8.c
@@ -25,6 +25,13 @@
#define PERL_IN_UTF8_C
#include "perl.h"
+#ifndef EBCDIC
+/* Separate prototypes needed because in ASCII systems these
+ * usually macros but they still are compiled as code, too. */
+PERL_CALLCONV UV Perl_utf8n_to_uvchr(pTHX_ const U8 *s, STRLEN curlen, STRLEN *retlen, U32 flags);
+PERL_CALLCONV U8* Perl_uvchr_to_utf8(pTHX_ U8 *d, UV uv);
+#endif
+
static const char unees[] =
"Malformed UTF-8 character (unexpected end of string)";