summaryrefslogtreecommitdiff
path: root/objXSUB.h
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-03-13 09:57:59 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-03-13 09:57:59 +0000
commit47d567cc8421418907223042cdf8798400aa3949 (patch)
tree97a1879303db24b6554877def609633c96dbbcb7 /objXSUB.h
parentb3bfe02172d129ebec35d498c788aa80d7a62bce (diff)
downloadperl-47d567cc8421418907223042cdf8798400aa3949.tar.gz
make the is_utf8_*() safe for use on invalid utf8 (they now
return false on such input instead of emitting warnings) p4raw-id: //depot/perl@5700
Diffstat (limited to 'objXSUB.h')
-rw-r--r--objXSUB.h4
1 files changed, 4 insertions, 0 deletions
diff --git a/objXSUB.h b/objXSUB.h
index 569065ca69..1906a661f7 100644
--- a/objXSUB.h
+++ b/objXSUB.h
@@ -687,6 +687,10 @@
#define Perl_to_uni_lower_lc pPerl->Perl_to_uni_lower_lc
#undef to_uni_lower_lc
#define to_uni_lower_lc Perl_to_uni_lower_lc
+#undef Perl_is_utf8_char
+#define Perl_is_utf8_char pPerl->Perl_is_utf8_char
+#undef is_utf8_char
+#define is_utf8_char Perl_is_utf8_char
#undef Perl_is_utf8_alnum
#define Perl_is_utf8_alnum pPerl->Perl_is_utf8_alnum
#undef is_utf8_alnum