[Gridflow-cvs] [svn] commit: r4970 - /trunk/src/formats.cxx

gridflow-cvs at artengine.ca gridflow-cvs at artengine.ca
Fri Feb 5 18:59:52 EST 2010


Author: matju
Date: Fri Feb  5 18:59:51 2010
New Revision: 4970

Log:
binary learnings for make benefit glorious nation microsoftstan

Modified:
    trunk/src/formats.cxx

Modified: trunk/src/formats.cxx
==============================================================================
--- trunk/src/formats.cxx (original)
+++ trunk/src/formats.cxx Fri Feb  5 18:59:51 2010
@@ -101,8 +101,13 @@
 
 \def 0 open(t_symbol *mode, string filename) {
 	const char *fmode;
+	#if __WIN32__
+	if (mode==gensym("in"))  fmode="rb"; else
+	if (mode==gensym("out")) fmode="wb"; else
+	#else
 	if (mode==gensym("in"))  fmode="r"; else
 	if (mode==gensym("out")) fmode="w"; else
+	#endif
 	RAISE("bad mode");
 	if (f) _0_close(0,0);
 	if (mode==gensym("in")) {filename = gf_find_file(filename);}



More information about the Gridflow-cvs mailing list