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;
encoding = IntegerOfTerm(tenc);
#ifdef _WIN32
if (st->status & Binary_Stream_f) {
if (opts & 2) {
strncat(io_mode, "b", 8);
} else {
strncat(io_mode, "t", 8);