From e57a3e29fb08a5c62abdbcd16701c4aa2624956f Mon Sep 17 00:00:00 2001
From: Andreas Scherer <andreas_tex@freenet.de>
Date: Mon, 13 Apr 2020 12:26:47 +0000
Subject: [CWEB] Purge global variable from 'main'.

In CWEAVE and CTWILL, move definition of 'use_language' to 'Extensions.'

git-svn-id: svn://tug.org/texlive/trunk@54718 c570f23f-e606-0410-a88d-b1316a301751
---
 Build/source/texk/web2c/cwebdir/ctwill-w2c.ch | 13 ++++++-------
 Build/source/texk/web2c/cwebdir/cweav-w2c.ch  | 13 ++++++-------
 2 files changed, 12 insertions(+), 14 deletions(-)

(limited to 'Build')

diff --git a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
index 2dde67b3ee0..3622d769d5a 100644
--- a/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/ctwill-w2c.ch
@@ -291,13 +291,6 @@ int ac, /* argument count */
 char **av@t\2\2@>) /* argument values */
 @z
 
-@x
-  argc=ac; argv=av;
-@y
-  extern const char *use_language; /* prefix to \.{cwebmac.tex} in \TEX/ output */
-  argc=ac; argv=av;
-@z
-
 @x
   program=cweave;
 @y
@@ -3152,6 +3145,12 @@ static void skip_limbo(void);@/
 static void squash(scrap_pointer,short,eight_bits,short,short);@/
 static void update_node(name_pointer p);@/
 
+@* Language setting.  This global variable is defined and set in \.{common} by
+the `\.{+l}' (or `\.{-l}') commandline option.
+
+@<Global var...@>=
+extern const char *use_language; /* prefix to \.{cwebmac.tex} in \TEX/ output */
+
 @* Output file update.  Most \CEE/ projects are controlled by a
 \.{Makefile} that automatically takes care of the temporal dependecies
 between the different source modules.  It is suitable that \.{CWEB} doesn't
diff --git a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
index bf52c91a45c..a7e4f84e060 100644
--- a/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
+++ b/Build/source/texk/web2c/cwebdir/cweav-w2c.ch
@@ -71,13 +71,6 @@ int ac, /* argument count */
 char **av@t\2\2@>) /* argument values */
 @z
 
-@x
-  argc=ac; argv=av;
-@y
-  extern const char *use_language; /* prefix to \.{cwebmac.tex} in \TEX/ output */
-  argc=ac; argv=av;
-@z
-
 @x
   make_xrefs=force_lines=make_pb=1; /* controlled by command-line options */
   common_init();
@@ -1915,6 +1908,12 @@ static void skip_limbo(void);@/
 static void squash(scrap_pointer,short,eight_bits,short,short);@/
 static void update_node(name_pointer p);@/
 
+@* Language setting.  This global variable is defined and set in \.{common} by
+the `\.{+l}' (or `\.{-l}') commandline option.
+
+@<Global var...@>=
+extern const char *use_language; /* prefix to \.{cwebmac.tex} in \TEX/ output */
+
 @* Output file update.  Most \CEE/ projects are controlled by a
 \.{Makefile} that automatically takes care of the temporal dependecies
 between the different source modules.  It is suitable that \.{CWEB} doesn't
-- 
cgit v1.2.3