summaryrefslogtreecommitdiff
path: root/perl.h
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2006-04-17 16:52:54 +0000
committerNicholas Clark <nick@ccl4.org>2006-04-17 16:52:54 +0000
commit5a22a2bbf3880b61603040e7bdfddd4d5f5809a5 (patch)
tree5550ae7e0db9c4343e2276ea67fb1c7ddad99590 /perl.h
parent77c0971848175eeb99efb2cca9509cbb29622d32 (diff)
downloadperl-5a22a2bbf3880b61603040e7bdfddd4d5f5809a5.tar.gz
Turn on UTF8 cache assertions with -Ca
p4raw-id: //depot/perl@27875
Diffstat (limited to 'perl.h')
-rw-r--r--perl.h4
1 files changed, 3 insertions, 1 deletions
diff --git a/perl.h b/perl.h
index c44c9b9298..5145e10eec 100644
--- a/perl.h
+++ b/perl.h
@@ -5444,6 +5444,7 @@ extern void moncontrol(int);
#define PERL_UNICODE_ARGV_FLAG 0x0020
#define PERL_UNICODE_LOCALE_FLAG 0x0040
#define PERL_UNICODE_WIDESYSCALLS_FLAG 0x0080 /* for Sarathy */
+#define PERL_UNICODE_UTF8CACHEASSERT_FLAG 0x0100
#define PERL_UNICODE_STD_FLAG \
(PERL_UNICODE_STDIN_FLAG | \
@@ -5459,7 +5460,7 @@ extern void moncontrol(int);
PERL_UNICODE_INOUT_FLAG | \
PERL_UNICODE_LOCALE_FLAG)
-#define PERL_UNICODE_ALL_FLAGS 0x00ff
+#define PERL_UNICODE_ALL_FLAGS 0x01ff
#define PERL_UNICODE_STDIN 'I'
#define PERL_UNICODE_STDOUT 'O'
@@ -5471,6 +5472,7 @@ extern void moncontrol(int);
#define PERL_UNICODE_ARGV 'A'
#define PERL_UNICODE_LOCALE 'L'
#define PERL_UNICODE_WIDESYSCALLS 'W'
+#define PERL_UNICODE_UTF8CACHEASSERT 'a'
#define PERL_SIGNALS_UNSAFE_FLAG 0x0001