diff options
author | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2020-07-16 17:32:16 +0100 |
---|---|---|
committer | Dagfinn Ilmari Mannsåker <ilmari@ilmari.org> | 2021-11-02 18:01:42 +0000 |
commit | 4457f3fc414965b3f281e91fc2e24332a7149345 (patch) | |
tree | 35f0c3c918d5d42cc3c65e6652eb389a3970bbd5 /doio.c | |
parent | b53d6a00df0da96446042ea510b013d59cf81109 (diff) | |
download | perl-4457f3fc414965b3f281e91fc2e24332a7149345.tar.gz |
Remove DOS/DJGPP support
DJGPP is a port of the GNU toolchain to 32-bit x86 systems running DOS.
The last known attempt to build Perl on it was on 5.20, which only got
as far as building miniperl.
Diffstat (limited to 'doio.c')
-rw-r--r-- | doio.c | 6 |
1 files changed, 0 insertions, 6 deletions
@@ -1389,9 +1389,6 @@ Perl_nextargv(pTHX_ GV *gv, bool nomagicopen) if ((PerlLIO_stat(SvPVX_const(sv),&statbuf) >= 0 && statbuf.st_dev == filedev && statbuf.st_ino == fileino) -#ifdef DJGPP - || ((_djstat_fail_bits & _STFAIL_TRUENAME)!=0) -#endif ) { Perl_ck_warner_d(aTHX_ packWARN(WARN_INPLACE), @@ -3311,9 +3308,6 @@ Perl_vms_start_glob sv_setpv(tmpcmd, "for a in "); sv_catsv(tmpcmd, tmpglob); sv_catpvs(tmpcmd, "; do echo \"$a\\0\\c\"; done |"); -# elif defined(DJGPP) - sv_setpv(tmpcmd, "/dev/dosglob/"); /* File System Extension */ - sv_catsv(tmpcmd, tmpglob); # else sv_setpv(tmpcmd, "perlglob "); sv_catsv(tmpcmd, tmpglob); |