[CWEB] Compare sections 205 and 216.

git-svn-id: svn://tug.org/texlive/trunk/Build/source@67856 c570f23f-e606-0410-a88d-b1316a301751
TeX-Live · Aug 9, 2023 · af4b8d8 · af4b8d8
1 parent deec859
commit af4b8d8
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 3 deletions.
diff --git a/texk/web2c/cwebdir/cweave.w b/texk/web2c/cwebdir/cweave.w
@@ -3887,10 +3887,10 @@ output_C(void) /* outputs the current token list */
   text_pointer p; /* translation of the \CEE/ text */
   next_control=ignore; p=C_translate();
   app(inner_tok_flag+(int)(p-tok_start));
-  if (make_pb) {
-    out_str("\\PB{"); make_output(); out('}');
+  if (make_pb) out_str("\\PB{");
 @.\\PB@>
-  }@+else make_output(); /* output the list */
+  make_output(); /* output the list */
+  if (make_pb) out('}');
   if (text_ptr>max_text_ptr) max_text_ptr=text_ptr;
   if (tok_ptr>max_tok_ptr) max_tok_ptr=tok_ptr;
   text_ptr=save_text_ptr; tok_ptr=save_tok_ptr; /* forget the tokens */

diff --git a/texk/web2c/cwebdir/system.bux b/texk/web2c/cwebdir/system.bux
@@ -16,6 +16,7 @@
 @$fflush "<stdio.h>" \zip@>
 @$fopen "<stdio.h>" \zip@>
 @$fprintf "<stdio.h>" \zip@>
+@$fputc "<stdio.h>" \zip@>
 @$fputs "<stdio.h>" \zip@>
 @$fread "<stdio.h>" \zip@>
 @$fwrite "<stdio.h>" \zip@>