From 5f6231423ff11a042181be707faa0db6012b8e35 Mon Sep 17 00:00:00 2001 From: Andreas Scherer Date: Wed, 24 Feb 2021 18:19:47 +0000 Subject: [CWEB] Code review. Compactify single function declarations. git-svn-id: svn://tug.org/texlive/trunk@57874 c570f23f-e606-0410-a88d-b1316a301751 --- Build/source/texk/web2c/cwebdir/ctwill-w2c.ch | 32 ++++++++++++++++----------- 1 file changed, 19 insertions(+), 13 deletions(-) (limited to 'Build/source/texk/web2c/cwebdir/ctwill-w2c.ch') diff --git a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch index e87b31170a1..682e2c0e039 100644 --- a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch +++ b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch @@ -500,11 +500,11 @@ ccode['r']=ccode['R']=right_start; @z @x -static eight_bits skip_TeX(void);@/ +static eight_bits skip_TeX(void); @ @c @y -static eight_bits skip_TeX(void);@/ +static eight_bits skip_TeX(void); @ We look for a clue about the program's title, because this will become part of all meanings. @@ -899,17 +899,15 @@ null_scrap.trans=&tok_start[0]; @z @x -static void print_text(text_pointer p);@/ -@y -#if 0 -static void print_text(text_pointer p);@/ -#endif -@z +@d inner_tok_flag 5*id_flag /* signifies a token list in `\pb' */ -@x +@c static void print_text(@t\1\1@> /* prints a token list for debugging; not used in |main| */ @y +@d inner_tok_flag 5*id_flag /* signifies a token list in `\pb' */ + +@c #if 0 static void print_text(@t\1\1@> /* prints a token list for debugging; not used in |main| */ @@ -928,6 +926,15 @@ print_text(@t\1\1@> /* prints a token list for debugging; not used in |main| */ #endif @z +@x +@ @=@+static void print_text(text_pointer p); +@y +@ @= +#if 0 +static void print_text(text_pointer p); +#endif +@z + @x the |for| loop below. @@ -1633,7 +1640,7 @@ placed on the list, unless they are reserved and their current } @ @= -{@+struct perm_meaning *q; +{ struct perm_meaning *q; while (temp_meaning_ptr>temp_meaning_stack) { out_mini(--temp_meaning_ptr); q=temp_meaning_ptr->id-name_dir+cur_meaning; @@ -1647,9 +1654,6 @@ placed on the list, unless they are reserved and their current } } -@ @= -static void out_mini(meaning_struct *);@/ - @ @c static void out_mini( meaning_struct *m) @@ -1669,6 +1673,8 @@ out_mini( out(' '); out_str(m->tex_part); finish_line(); } +@ @=@+static void out_mini(meaning_struct *); + @ @= switch (cur_name->ilk) { case normal: case func_template: if (length(cur_name)==1) out_str("\\|"); -- cgit v1.2.3