diff options
| author | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-20 20:04:39 +0000 |
|---|---|---|
| committer | Nick Ing-Simmons <nik@tiuk.ti.com> | 2001-03-20 20:04:39 +0000 |
| commit | 2b9d42f0ba1bb562fe21327dc7948ab1a5397a19 (patch) | |
| tree | aee45626e3738deabafbe610cedef159d4c82d3b /lib/utf8.pm | |
| parent | f2f6ab5ed2d2f824b4f6c3085a4a2275c2f8500a (diff) | |
| download | perl-2b9d42f0ba1bb562fe21327dc7948ab1a5397a19.tar.gz | |
More EBCDIC stuff:
- Loose the extra level of function on ASCII.
- spotted a chr(0) issue in sv.c
- re-work of UTF-X tr/// ranges to work in Unicode
space. Still issues with the "0xff is illegal UTF-8" hack.
- Yet another ad. hoc. utf8 'upgrade' in op.c recoded
(why do it once when you can do it all over the place :-(
- Enable HINTS_UTF8 on EBCDIC - then ignore it in toke.c,
need utf8.pm for swashes.
- Simplified and commented scan_const() in toke.c
Still something wrong regexp and tr (swashes?).
p4raw-id: //depot/perlio@9267
Diffstat (limited to 'lib/utf8.pm')
| -rw-r--r-- | lib/utf8.pm | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/lib/utf8.pm b/lib/utf8.pm index 7c9a7dfb4e..f32c0bc5b7 100644 --- a/lib/utf8.pm +++ b/lib/utf8.pm @@ -1,6 +1,5 @@ package utf8; -if (ord('A') != 193) { # make things more pragmatic for EBCDIC folk $utf8::hint_bits = 0x00800000; @@ -21,8 +20,6 @@ sub AUTOLOAD { Carp::croak("Undefined subroutine $AUTOLOAD called"); } -} - 1; __END__ |