make sure binary files are open as binary in WIN32 (obs from Meera Sridhar).

This commit is contained in:
U-Khasa\Vitor 2009-08-02 16:04:21 -05:00
parent 2c53d1f8ed
commit f68cc92bce

View File

@ -2311,7 +2311,7 @@ p_open (void)
return FALSE; return FALSE;
encoding = IntegerOfTerm(tenc); encoding = IntegerOfTerm(tenc);
#ifdef _WIN32 #ifdef _WIN32
if (st->status & Binary_Stream_f) { if (opts & 2) {
strncat(io_mode, "b", 8); strncat(io_mode, "b", 8);
} else { } else {
strncat(io_mode, "t", 8); strncat(io_mode, "t", 8);