diff options
| author | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-12-20 16:23:36 +0100 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgs@consttype.org> | 2009-12-20 16:28:36 +0100 |
| commit | 1863b87966ed39b042c45e12d1b4e0b90b9cc071 (patch) | |
| tree | eae5c03c697269b036352d4b007f9c1294f189c9 /perl.h | |
| parent | 1d5fe431325abdb0f3947d563ebdef67bd4cb7cd (diff) | |
| download | perl-1863b87966ed39b042c45e12d1b4e0b90b9cc071.tar.gz | |
Introduce C<use feature "unicode_strings">
This turns on the unicode semantics for uc/lc/ucfirst/lcfirst
operations on strings without the UTF8 bit set but with ASCII
characters higher than 127. This replaces the "legacy" pragma
experiment.
Note that currently this feature sets both a bit in $^H and
a (unused) key in %^H. The bit in $^H could be replaced by
a flag on the uc/lc/etc op. It's probably not feasible to
test a key in %^H in pp_uc in friends each time we want to
know which semantics to apply.
Diffstat (limited to 'perl.h')
| -rw-r--r-- | perl.h | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -4773,7 +4773,7 @@ enum { /* pass one of these to get_vtbl */ #define HINT_BLOCK_SCOPE 0x00000100 #define HINT_STRICT_SUBS 0x00000200 /* strict pragma */ #define HINT_STRICT_VARS 0x00000400 /* strict pragma */ -#define HINT_NOT_UNI_8_BIT 0x00000800 /* unicode8bit pragma */ +#define HINT_UNI_8_BIT 0x00000800 /* unicode_strings feature */ /* The HINT_NEW_* constants are used by the overload pragma */ #define HINT_NEW_INTEGER 0x00001000 |