summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorSteve Hay <steve.m.hay@googlemail.com>2011-09-10 17:21:58 +0100
committerSteve Hay <steve.m.hay@googlemail.com>2011-09-10 18:16:59 +0100
commit378eeda70cc27194f0f718b4c65b8ba147259910 (patch)
tree26c3c6b5adb9c5027a78c6143cdced30ce57a9d4 /toke.c
parent528bd3ce854c33aaf668dd3aa007a60a4994edac (diff)
downloadperl-378eeda70cc27194f0f718b4c65b8ba147259910.tar.gz
The Borland Chainsaw Massacre
Remove support for the Borland C++ compiler on Win32, as agreed here: http://www.xray.mpe.mpg.de/mailing-lists/perl5-porters/2011-09/msg00034.html
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c6
1 files changed, 0 insertions, 6 deletions
diff --git a/toke.c b/toke.c
index cc09ad04a6..59177d6554 100644
--- a/toke.c
+++ b/toke.c
@@ -6978,12 +6978,6 @@ Perl_yylex(pTHX)
#else
if (PerlLIO_setmode(PerlIO_fileno(PL_rsfp), O_TEXT) != -1) {
#endif /* NETWARE */
-#ifdef PERLIO_IS_STDIO /* really? */
-# if defined(__BORLANDC__)
- /* XXX see note in do_binmode() */
- ((FILE*)PL_rsfp)->flags &= ~_F_BIN;
-# endif
-#endif
if (loc > 0)
PerlIO_seek(PL_rsfp, loc, 0);
}