Compilation help for EBCDIC platforms, from Jarkko,
Rafael Garcia-Suarez [Thu, 22 Dec 2005 19:37:42 +0000 (19:37 +0000)]
tested by Rajarshi Das

p4raw-id: //depot/perl@26452

utf8.h

diff --git a/utf8.h b/utf8.h
index d1989ec..64dc393 100644 (file)
--- a/utf8.h
+++ b/utf8.h
 #    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 */