From 10ea2d43b2a54d06a93f949af0753391c6d9f275 Mon Sep 17 00:00:00 2001 From: Andreas Scherer Date: Wed, 10 Jun 2020 13:25:41 +0000 Subject: [CWEB] Add short comments to new material. git-svn-id: svn://tug.org/texlive/trunk@55505 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/ctangleboot.cin | 24 ++++++++++++------------ Build/source/texk/web2c/cwebdir/ChangeLog | 4 ++++ Build/source/texk/web2c/cwebdir/ctang-w2c.ch | 12 +++++++++--- 3 files changed, 25 insertions(+), 15 deletions(-) (limited to 'Build') diff --git a/Build/source/texk/web2c/ctangleboot.cin b/Build/source/texk/web2c/ctangleboot.cin index f1c6e7ba140..75c911374db 100644 --- a/Build/source/texk/web2c/ctangleboot.cin +++ b/Build/source/texk/web2c/ctangleboot.cin @@ -290,7 +290,7 @@ extern void cb_show_banner(void); #line 128 "cwebdir/ctangle.w" /*:15*//*108:*/ -#line 899 "cwebdir/ctang-w2c.ch" +#line 905 "cwebdir/ctang-w2c.ch" extern char cb_banner[]; @@ -525,7 +525,7 @@ ccode['\'']= ord; section_text[0]= ' '; /*:71*//*109:*/ -#line 902 "cwebdir/ctang-w2c.ch" +#line 908 "cwebdir/ctang-w2c.ch" strncpy(cb_banner,banner,max_banner-1); @@ -832,10 +832,10 @@ flush_buffer();fclose(C_file);C_file= NULL; if(0==strcmp("/dev/stdout",output_file_name)) /*104:*/ -#line 859 "cwebdir/ctang-w2c.ch" +#line 861 "cwebdir/ctang-w2c.ch" { /*107:*/ -#line 886 "cwebdir/ctang-w2c.ch" +#line 892 "cwebdir/ctang-w2c.ch" char in_buf[BUFSIZ+1]; int in_size,comparison= true; @@ -844,7 +844,7 @@ fatal("! Cannot open output file ",check_file_name); /*:107*/ -#line 860 "cwebdir/ctang-w2c.ch" +#line 862 "cwebdir/ctang-w2c.ch" do{ in_size= fread(in_buf,1,BUFSIZ,check_file); @@ -863,7 +863,7 @@ rename(check_file_name,output_file_name); } /*:103*/ -#line 867 "cwebdir/ctang-w2c.ch" +#line 869 "cwebdir/ctang-w2c.ch" } @@ -872,10 +872,10 @@ rename(check_file_name,output_file_name); else if(0==strcmp("/dev/stderr",output_file_name)) /*105:*/ -#line 870 "cwebdir/ctang-w2c.ch" +#line 874 "cwebdir/ctang-w2c.ch" { /*107:*/ -#line 886 "cwebdir/ctang-w2c.ch" +#line 892 "cwebdir/ctang-w2c.ch" char in_buf[BUFSIZ+1]; int in_size,comparison= true; @@ -884,7 +884,7 @@ fatal("! Cannot open output file ",check_file_name); /*:107*/ -#line 871 "cwebdir/ctang-w2c.ch" +#line 875 "cwebdir/ctang-w2c.ch" do{ in_size= fread(in_buf,1,BUFSIZ,check_file); @@ -903,7 +903,7 @@ rename(check_file_name,output_file_name); } /*:103*/ -#line 878 "cwebdir/ctang-w2c.ch" +#line 882 "cwebdir/ctang-w2c.ch" } @@ -912,7 +912,7 @@ rename(check_file_name,output_file_name); else if(0==strcmp("/dev/null",output_file_name)) /*106:*/ -#line 881 "cwebdir/ctang-w2c.ch" +#line 887 "cwebdir/ctang-w2c.ch" { int comparison= true; /*103:*/ @@ -926,7 +926,7 @@ rename(check_file_name,output_file_name); } /*:103*/ -#line 883 "cwebdir/ctang-w2c.ch" +#line 889 "cwebdir/ctang-w2c.ch" } diff --git a/Build/source/texk/web2c/cwebdir/ChangeLog b/Build/source/texk/web2c/cwebdir/ChangeLog index afad20247c0..c8c84f501be 100644 --- a/Build/source/texk/web2c/cwebdir/ChangeLog +++ b/Build/source/texk/web2c/cwebdir/ChangeLog @@ -1,3 +1,7 @@ +2020-06-10 Andreas Scherer + + * ctang-w2c.ch: Add short comments to new material. + 2020-06-10 Andreas Scherer * texinputs/p+cwebmac.tex: Switch on PDF creation with 'cweave -lp+' diff --git a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch index d3027f5bd04..44b10f99ce4 100644 --- a/Build/source/texk/web2c/cwebdir/ctang-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/ctang-w2c.ch @@ -856,7 +856,9 @@ else { rename(check_file_name,output_file_name); } -@ @={ +@ Copy secondary output to |stdout|. + +@={ @@; do { in_size = fread(in_buf,1,BUFSIZ,check_file); @@ -867,7 +869,9 @@ else { @@; } -@ @={ +@ Copy secondary output to |stderr|. + +@={ @@; do { in_size = fread(in_buf,1,BUFSIZ,check_file); @@ -878,7 +882,9 @@ else { @@; } -@ @={ +@ No copying necessary, just remove the temporary output file. + +@={ int comparison=true; @@; } -- cgit v1.2.3