diff options
author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-21 00:37:04 +0000 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-03-21 00:37:04 +0000 |
commit | a83e3d3ce76b34dfbf0c18f74b132c113d546c4a (patch) | |
tree | cd845fd3129a4d26846d25402d7f607bc2918179 /lib | |
parent | ffb9ee5f5f9d80d28ce950a2ff357650c8f1cc03 (diff) | |
parent | 2b9d42f0ba1bb562fe21327dc7948ab1a5397a19 (diff) | |
download | perl-a83e3d3ce76b34dfbf0c18f74b132c113d546c4a.tar.gz |
Integrate perlio:
[ 9267]
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-link: @9267 on //depot/perlio: 2b9d42f0ba1bb562fe21327dc7948ab1a5397a19
p4raw-id: //depot/perl@9268
Diffstat (limited to 'lib')
-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__ |