summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>2001-03-21 00:37:04 +0000
committerJarkko Hietaniemi <jhi@iki.fi>2001-03-21 00:37:04 +0000
commita83e3d3ce76b34dfbf0c18f74b132c113d546c4a (patch)
treecd845fd3129a4d26846d25402d7f607bc2918179 /lib
parentffb9ee5f5f9d80d28ce950a2ff357650c8f1cc03 (diff)
parent2b9d42f0ba1bb562fe21327dc7948ab1a5397a19 (diff)
downloadperl-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.pm3
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__