From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Thu, 22 Dec 2005 19:37:42 +0000 (+0000)
Subject: Compilation help for EBCDIC platforms, from Jarkko,
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fd7cb28932b10967bdc6b5b22df7b182830362a3;p=p5sagit%2Fp5-mst-13.2.git

Compilation help for EBCDIC platforms, from Jarkko,
tested by Rajarshi Das

p4raw-id: //depot/perl@26452
---

diff --git a/utf8.h b/utf8.h
index d1989ec..64dc393 100644
--- a/utf8.h
+++ b/utf8.h
@@ -16,12 +16,17 @@
 #    define USE_UTF8_IN_NAMES (PL_hints & HINT_UTF8)
 #endif
 
+/* Source backward compatibility. */
+#define uvuni_to_utf8(d, uv)		uvuni_to_utf8_flags(d, uv, 0)
+#define is_utf8_string_loc(s, len, ep)	is_utf8_string_loclen(s, len, ep, 0)
+
 #ifdef EBCDIC
 /* The equivalent of these macros but implementing UTF-EBCDIC
    are in the following header file:
  */
 
 #include "utfebcdic.h"
+
 #else
 START_EXTERN_C
 
@@ -332,7 +337,4 @@ encoded character.
 
 #define IS_UTF8_CHAR_FAST(n) ((n) <= 4)
 
-#define uvuni_to_utf8(d, uv)		uvuni_to_utf8_flags(d, uv, 0)
-#define is_utf8_string_loc(s, len, ep)	is_utf8_string_loclen(s, len, ep, 0)
-
 #endif /* IS_UTF8_CHAR() for UTF-8 */