diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-17 20:32:01 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-17 20:32:01 +0000 |
| commit | 753838417b30f18133bff09e0b7fa58f5a0db60a (patch) | |
| tree | 93df6509715626507a338293ccfc761840ad9f01 /utf8.c | |
| parent | 57ce1777e628f108f670a828f77ce6475bb81e32 (diff) | |
| download | perl-753838417b30f18133bff09e0b7fa58f5a0db60a.tar.gz | |
Correct #if EBCDIC side typos.
Builds and passes many tests on OS390.
p4raw-id: //depot/perlio@9190
Diffstat (limited to 'utf8.c')
| -rw-r--r-- | utf8.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -309,7 +309,7 @@ Perl_utf8n_to_uvuni(pTHX_ U8* s, STRLEN curlen, STRLEN* retlen, U32 flags) } #ifdef EBCDIC - uv = NATIVE_TO_UVF(uv); + uv = NATIVE_TO_UTF(uv); #else if ((uv == 0xfe || uv == 0xff) && !(flags & UTF8_ALLOW_FE_FF)) { |