4 files changed, 40 insertions, 1 deletions
diff --git a/Build/source/texk/web2c/cwebdir/ChangeLog b/Build/source/texk/web2c/cwebdir/ChangeLog
index 0848bfed769..9b1ede03ba9 100644
--- a/Build/source/texk/web2c/cwebdir/ChangeLog
+++ b/Build/source/texk/web2c/cwebdir/ChangeLog
@@ -1,3 +1,8 @@
+2012-05-18  Peter Breitenlohner  <peb@mppmu.mpg.de>
+
+	* {comm,ctang,cweav}-w2c.ch: Use binary mode for output files.
+	From Akira Kakuto <kakuto@fuk.kindai.ac.jp> (W32TeX).
+
 2011-04-19  Peter Breitenlohner  <peb@mppmu.mpg.de>
 
 	Avoid 'differ in signedness' warnings.
diff --git a/Build/source/texk/web2c/cwebdir/comm-w2c.ch b/Build/source/texk/web2c/cwebdir/comm-w2c.ch
index cf1f9ede4fa..1561f961697 100644
--- a/Build/source/texk/web2c/cwebdir/comm-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/comm-w2c.ch
@@ -660,6 +660,20 @@ FILE *active_file; /* currently active file for \.{CWEAVE} output */
 char *found_filename; /* filename found by |kpse_find_file| */
 @z
 
+Section 78.
+
+@x l.1380 Use binary mode for output files
+  if ((C_file=fopen(C_file_name,"w"))==NULL)
+@y
+  if ((C_file=fopen(C_file_name,"wb"))==NULL)
+@z
+
+@x l.1386 Use binary mode for output files
+  if ((tex_file=fopen(tex_file_name,"w"))==NULL)
+@y
+  if ((tex_file=fopen(tex_file_name,"wb"))==NULL)
+@z
+
 
 Section 81. (reused)
 
diff --git a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch
index 82aec2d9f49..d4d301f7bd4 100644
--- a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch
@@ -249,6 +249,14 @@ static void
 phase_two (void) {
 @z
 
+Section 43.
+
+@x l.577 Use binary mode for output files
+    C_file=fopen(output_file_name,"w");
+@y
+    C_file=fopen(output_file_name,"wb");
+@z
+
 Section 46.
 
 @x l.603
diff --git a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
index 723daaf585e..a4f49e71470 100644
--- a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
@@ -891,9 +891,21 @@ static void
 phase_three (void) {
 @z
 
+@x l.4309 Use binary mode for output files
+  if ((idx_file=fopen(idx_file_name,"w"))==NULL)
+@y
+  if ((idx_file=fopen(idx_file_name,"wb"))==NULL)
+@z
+
+@x l.4324 Use binary mode for output files
+  if ((scn_file=fopen(scn_file_name,"w"))==NULL)
+@y
+  if ((scn_file=fopen(scn_file_name,"wb"))==NULL)
+@z
+
 Section 235.
 
-@x
+@x l.4440
 strcpy(collate+1," \1\2\3\4\5\6\7\10\11\12\13\14\15\16\17");
 /* 16 characters + 1 = 17 */
 strcpy(collate+17,"\20\21\22\23\24\25\26\27\30\31\32\33\34\35\36\37");