summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
diff options
context:
space:
mode:
authorAndreas Scherer <andreas_tex@freenet.de>2021-02-24 18:19:47 +0000
committerAndreas Scherer <andreas_tex@freenet.de>2021-02-24 18:19:47 +0000
commit5f6231423ff11a042181be707faa0db6012b8e35 (patch)
tree1aa670b8921584ddbc3c972cb6016d4bbb670606 /Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
parent180bb00c12d352e3d1c374a1587d4dc898300c5f (diff)
[CWEB] Code review.
Compactify single function declarations. git-svn-id: svn://tug.org/texlive/trunk@57874 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/cwebdir/ctwill-w2c.ch')
-rw-r--r--Build/source/texk/web2c/cwebdir/ctwill-w2c.ch32
1 files changed, 19 insertions, 13 deletions
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| */
@@ -929,6 +927,15 @@ print_text(@t\1\1@> /* prints a token list for debugging; not used in |main| */
@z
@x
+@ @<Predecl...@>=@+static void print_text(text_pointer p);
+@y
+@ @<Predecl...@>=
+#if 0
+static void print_text(text_pointer p);
+#endif
+@z
+
+@x
the |for| loop below.
@c
@@ -1633,7 +1640,7 @@ placed on the list, unless they are reserved and their current
}
@ @<Output information about usage of id's defined in other sections@>=
-{@+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
}
}
-@ @<Predec...@>=
-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();
}
+@ @<Predec...@>=@+static void out_mini(meaning_struct *);
+
@ @<Mini-output...@>=
switch (cur_name->ilk) {
case normal: case func_template: if (length(cur_name)==1) out_str("\\|");