[asperl] various changes to get asperl working under Borland

(passes all tests when built under PERL_OBJECT)

p4raw-id: //depot/asperl@809

1 files changed, 1 insertions, 1 deletions

diff --git a/pp_sys.c b/pp_sys.c
index 19650b99f5..8159a5cb1b 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -497,7 +497,7 @@ PP(pp_binmode)
 	 * document this anywhere). GSAR 97-5-24
 	 */
 	PerlIO_seek(fp,0L,0);
-	fp->flags |= _F_BIN;
+	((FILE*)fp)->flags |= _F_BIN;
 #endif
 	RETPUSHYES;
     }