summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Build/source/texk/web2c/web2c/ChangeLog6
-rw-r--r--Build/source/texk/web2c/web2c/fixwrites.c8
2 files changed, 14 insertions, 0 deletions
diff --git a/Build/source/texk/web2c/web2c/ChangeLog b/Build/source/texk/web2c/web2c/ChangeLog
index 948ff1bfaff..a5b011a9294 100644
--- a/Build/source/texk/web2c/web2c/ChangeLog
+++ b/Build/source/texk/web2c/web2c/ChangeLog
@@ -1,3 +1,9 @@
+2012-01-09 Peter Breitenlohner <peb@mppmu.mpg.de>
+
+ * fixwrites.c: Replace 'fprintf(filename, "%c\n", char);' by
+ '{ putc(char, filename); putc ('\n', filename); }'. Patch from
+ Akira Kakuto for (u)pDVItype & Co. where putc() => putc2().
+
2011-10-13 Peter Breitenlohner <peb@mppmu.mpg.de>
* common.defines: Remove ALEPHHELP.
diff --git a/Build/source/texk/web2c/web2c/fixwrites.c b/Build/source/texk/web2c/web2c/fixwrites.c
index 6489377bea2..82d0c8f4ca1 100644
--- a/Build/source/texk/web2c/web2c/fixwrites.c
+++ b/Build/source/texk/web2c/web2c/fixwrites.c
@@ -438,6 +438,14 @@ main (int argc, string *argv)
*as = '\0';
printf ("putc (%s, %s);\n", argp, filename);
}
+ else if (strcmp (args, "%c\\n") == 0)
+ {
+ for (as = argp; *as; ++as) ;
+ while (*--as != ')') ;
+ *as = '\0';
+ printf ("{ putc (%s, %s); ", argp, filename);
+ printf ("putc ( '\\n', %s); }\n", filename);
+ }
else if (strcmp (args, "%s") == 0)
printf ("Fputs (%s, %s\n", filename, argp);
else