diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-12 21:00:13 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-12 21:00:13 +0000 |
| commit | 03cfe0aec1e921aae8754172fe1982455c07ce69 (patch) | |
| tree | 91058c1d54edc3fdd5d8a8cc22fe8b3d7e82e73c /utf8.h | |
| parent | 5e12f4fbf2391bc262df1da61c1745c66dc76d71 (diff) | |
| download | perl-03cfe0aec1e921aae8754172fe1982455c07ce69.tar.gz | |
#ifdef'ed out code for 'USE_BYTES_DOWNGRADES' case.
p4raw-id: //depot/perlio@9110
Diffstat (limited to 'utf8.h')
| -rw-r--r-- | utf8.h | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -31,7 +31,11 @@ END_EXTERN_C /* #define IN_UTF8 (PL_curcop->op_private & HINT_UTF8) */ #define IN_BYTE (PL_curcop->op_private & HINT_BYTE) +#ifdef USE_BYTES_DOWNGRADES +#define DO_UTF8(sv) (SvUTF8(sv) && !(IN_BYTE && sv_utf8_downgrade(sv,0))) +#else #define DO_UTF8(sv) (SvUTF8(sv) && !IN_BYTE) +#endif #define UTF8_ALLOW_EMPTY 0x0001 #define UTF8_ALLOW_CONTINUATION 0x0002 |