summaryrefslogtreecommitdiff
path: root/doio.c
diff options
context:
space:
mode:
authorJarkko Hietaniemi <jhi@iki.fi>1999-01-13 16:50:17 +0000
committerJarkko Hietaniemi <jhi@iki.fi>1999-01-13 16:50:17 +0000
commit61ae2fbf8676dafa05a9a9a710fde421f30a2071 (patch)
tree4f497a4eee07a49f48be8badf49ad54f068f11f8 /doio.c
parentb8f0c030659550e4d527ee8f11cd2f012f1bd1b0 (diff)
downloadperl-61ae2fbf8676dafa05a9a9a710fde421f30a2071.tar.gz
Atari MiNT port by Guido Flohr <gufl0000@stud.uni-sb.de>
(the diffs were based on 5.004_02). Tested by Guido and Frank Naumann <fnaumann@prinz-atm.CS.Uni-Magdeburg.De>. p4raw-id: //depot/cfgperl@2594
Diffstat (limited to 'doio.c')
-rw-r--r--doio.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/doio.c b/doio.c
index 08577a96ce..641046b731 100644
--- a/doio.c
+++ b/doio.c
@@ -781,7 +781,7 @@ do_binmode(PerlIO *fp, int iotype, int flag)
if (flag != TRUE)
croak("panic: unsetting binmode"); /* Not implemented yet */
#ifdef DOSISH
-#ifdef atarist
+#if defined(atarist) || defined(__MINT__)
if (!PerlIO_flush(fp) && (fp->_flag |= _IOBIN))
return 1;
else