diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-20 17:34:32 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-02-20 17:34:32 +0000 |
| commit | cbebf3444d32314df9db7cb3988b6c97da05aa13 (patch) | |
| tree | e0bc62e0157044a228af4aa13570f910aebf0fc8 /util.c | |
| parent | 4176d4e4193dbc6436aec8706515884cf6b882d7 (diff) | |
| download | perl-cbebf3444d32314df9db7cb3988b6c97da05aa13.tar.gz | |
Integrate changes #8853,8854 from maintperl to mainline.
EBDIC fixes, README.win32 Borland update.
p4raw-link: @8854 on //depot/maint-5.6/perl: ece00f1416215bb2d7a51174ba7aa627e0b0a3ad
p4raw-link: @8853 on //depot/maint-5.6/perl: 3ef34714520621f9238ff67b9f34f043113325c1
p4raw-id: //depot/perl@8857
p4raw-integrated: from //depot/maint-5.6/perl@8851 'merge in'
README.win32 (@8175..) handy.h (@8789..) util.c (@8806..)
Diffstat (limited to 'util.c')
| -rw-r--r-- | util.c | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -4004,6 +4004,9 @@ Perl_report_evil_fh(pTHX_ GV *gv, IO *io, I32 op) } #ifdef EBCDIC +/* in ASCII order, not that it matters */ +static const char controllablechars[] = "?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\\]^_"; + int Perl_ebcdic_control(pTHX_ int ch) { |