diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-06 11:45:15 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-10-06 11:45:15 +0000 |
| commit | 18e6b73a5fbc1457266f8212f295929b583e656d (patch) | |
| tree | 9d60e997c8e6ebbf1096b8424e2c4033918f9d82 /pp_ctl.c | |
| parent | 2ecf2f18702e39bbc9823245e3f601c8a14c24f6 (diff) | |
| download | perl-18e6b73a5fbc1457266f8212f295929b583e656d.tar.gz | |
The HINT_BYTE patch is apparently unnecessary, retracted.
p4raw-id: //depot/perl@7156
Diffstat (limited to 'pp_ctl.c')
| -rw-r--r-- | pp_ctl.c | 8 |
1 files changed, 0 insertions, 8 deletions
@@ -2694,11 +2694,7 @@ Perl_sv_compile_2op(pTHX_ SV *sv, OP** startop, char *code, AV** avp) #else SAVEVPTR(PL_op); #endif -#ifdef EBCDIC - PL_hints = HINT_BYTE; -#else PL_hints = 0; -#endif PL_op = &dummy; PL_op->op_type = OP_ENTEREVAL; @@ -3244,11 +3240,7 @@ trylocal: { PL_rsfp = tryrsfp; SAVEHINTS(); -#ifdef EBCDIC - PL_hints = HINT_BYTE; -#else PL_hints = 0; -#endif SAVESPTR(PL_compiling.cop_warnings); if (PL_dowarn & G_WARN_ALL_ON) PL_compiling.cop_warnings = pWARN_ALL ; |