summaryrefslogtreecommitdiff
path: root/objXSUB.h
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2001-03-10 11:55:43 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2001-03-10 11:55:43 +0000
commit9041c2e396c8c7de7680a2007dc341a9f65be0d0 (patch)
tree19075254fbc0495a697b5e15ca1f19a99e02ac77 /objXSUB.h
parent2ef28da1578e18cf36b9a30b71ac471521d2b507 (diff)
downloadperl-9041c2e396c8c7de7680a2007dc341a9f65be0d0.tar.gz
EBCDIC sanity - phase I
- rename utf8/uv functions to indicate what sort of uv they provide (uvuni/uvchr) - use utf8n_xxxx (c.f. pvn) for forms which take length. - back out vN.N and $^V exceptions to e2a/a2e - make "locale" isxxx macros be uvchr (may be redundant?) Not clear yet that toUPPER_uni et. al. return being handled correctly. The tr// and rexexp stuff still needs an audit, assumption is they are working in Unicode space. Need to provide v5.6 names for XS modules (decide is uni or chr ?). p4raw-id: //depot/perlio@9096
Diffstat (limited to 'objXSUB.h')
-rw-r--r--objXSUB.h36
1 files changed, 24 insertions, 12 deletions
diff --git a/objXSUB.h b/objXSUB.h
index f9f48d11d1..7bba68a9dc 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -1901,18 +1901,30 @@
#define Perl_bytes_to_utf8 pPerl->Perl_bytes_to_utf8
#undef bytes_to_utf8
#define bytes_to_utf8 Perl_bytes_to_utf8
-#undef Perl_utf8_to_uv_simple
-#define Perl_utf8_to_uv_simple pPerl->Perl_utf8_to_uv_simple
-#undef utf8_to_uv_simple
-#define utf8_to_uv_simple Perl_utf8_to_uv_simple
-#undef Perl_utf8_to_uv
-#define Perl_utf8_to_uv pPerl->Perl_utf8_to_uv
-#undef utf8_to_uv
-#define utf8_to_uv Perl_utf8_to_uv
-#undef Perl_uv_to_utf8
-#define Perl_uv_to_utf8 pPerl->Perl_uv_to_utf8
-#undef uv_to_utf8
-#define uv_to_utf8 Perl_uv_to_utf8
+#undef Perl_utf8_to_uvchr
+#define Perl_utf8_to_uvchr pPerl->Perl_utf8_to_uvchr
+#undef utf8_to_uvchr
+#define utf8_to_uvchr Perl_utf8_to_uvchr
+#undef Perl_utf8_to_uvuni
+#define Perl_utf8_to_uvuni pPerl->Perl_utf8_to_uvuni
+#undef utf8_to_uvuni
+#define utf8_to_uvuni Perl_utf8_to_uvuni
+#undef Perl_utf8n_to_uvchr
+#define Perl_utf8n_to_uvchr pPerl->Perl_utf8n_to_uvchr
+#undef utf8n_to_uvchr
+#define utf8n_to_uvchr Perl_utf8n_to_uvchr
+#undef Perl_utf8n_to_uvuni
+#define Perl_utf8n_to_uvuni pPerl->Perl_utf8n_to_uvuni
+#undef utf8n_to_uvuni
+#define utf8n_to_uvuni Perl_utf8n_to_uvuni
+#undef Perl_uvchr_to_utf8
+#define Perl_uvchr_to_utf8 pPerl->Perl_uvchr_to_utf8
+#undef uvchr_to_utf8
+#define uvchr_to_utf8 Perl_uvchr_to_utf8
+#undef Perl_uvuni_to_utf8
+#define Perl_uvuni_to_utf8 pPerl->Perl_uvuni_to_utf8
+#undef uvuni_to_utf8
+#define uvuni_to_utf8 Perl_uvuni_to_utf8
#undef Perl_warn
#define Perl_warn pPerl->Perl_warn
#undef warn