texlive[54716] Build/source/texk/web2c: Add 'gettext' comment in

commits+ascherer at tug.org commits+ascherer at tug.org
Mon Apr 13 10:06:23 CEST 2020


Revision: 54716
          http://tug.org/svn/texlive?view=revision&revision=54716
Author:   ascherer
Date:     2020-04-13 10:06:22 +0200 (Mon, 13 Apr 2020)
Log Message:
-----------
Add 'gettext' comment in section 6 of the main programs.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/ctangleboot.cin
    trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h

Modified: trunk/Build/source/texk/web2c/ctangleboot.cin
===================================================================
--- trunk/Build/source/texk/web2c/ctangleboot.cin	2020-04-12 23:54:18 UTC (rev 54715)
+++ trunk/Build/source/texk/web2c/ctangleboot.cin	2020-04-13 08:06:22 UTC (rev 54716)
@@ -8,7 +8,7 @@
 #line 83 "cwebdir/ctangle.w"
 
 /*:2*//*6:*/
-#line 45 "cwebdir/comm-w2c.h"
+#line 52 "cwebdir/comm-w2c.h"
 
 #ifndef HAVE_GETTEXT
 #define HAVE_GETTEXT 0
@@ -51,7 +51,8 @@
 #define cweave 1
 #define ctwill 2 \
 
-#define _(STRING) gettext(STRING) 
+#define _(STRING) gettext(STRING)  \
+
 #define and_and 04
 #define lt_lt 020
 #define gt_gt 021
@@ -174,7 +175,7 @@
 extern int phase;
 
 /*:5*//*7:*/
-#line 79 "cwebdir/comm-w2c.h"
+#line 86 "cwebdir/comm-w2c.h"
 
 extern char section_text[];
 extern char*section_text_end;
@@ -182,7 +183,7 @@
 extern char*id_loc;
 
 /*:7*//*8:*/
-#line 94 "cwebdir/comm-w2c.h"
+#line 101 "cwebdir/comm-w2c.h"
 
 extern char buffer[];
 extern char*buffer_end;
@@ -190,7 +191,7 @@
 extern char*limit;
 
 /*:8*//*9:*/
-#line 109 "cwebdir/comm-w2c.h"
+#line 116 "cwebdir/comm-w2c.h"
 
 typedef struct name_info{
 char*byte_start;
@@ -224,7 +225,7 @@
 extern void sprint_section_name(char*,name_pointer);
 
 /*:9*//*10:*/
-#line 150 "cwebdir/comm-w2c.h"
+#line 157 "cwebdir/comm-w2c.h"
 
 extern int history;
 extern int wrap_up(void);
@@ -233,7 +234,7 @@
 extern void overflow(const char*);
 
 /*:10*//*11:*/
-#line 165 "cwebdir/comm-w2c.h"
+#line 172 "cwebdir/comm-w2c.h"
 
 extern int include_depth;
 extern FILE*file[];
@@ -257,7 +258,7 @@
 extern void reset_input(void);
 
 /*:11*//*12:*/
-#line 188 "cwebdir/comm-w2c.h"
+#line 195 "cwebdir/comm-w2c.h"
 
 extern sixteen_bits section_count;
 extern boolean changed_section[];
@@ -265,7 +266,7 @@
 extern boolean print_where;
 
 /*:12*//*13:*/
-#line 201 "cwebdir/comm-w2c.h"
+#line 208 "cwebdir/comm-w2c.h"
 
 extern int argc;
 extern char**argv;
@@ -272,7 +273,7 @@
 extern boolean flags[];
 
 /*:13*//*14:*/
-#line 213 "cwebdir/comm-w2c.h"
+#line 220 "cwebdir/comm-w2c.h"
 
 extern FILE*C_file;
 extern FILE*tex_file;
@@ -282,7 +283,7 @@
 extern FILE*active_file;
 
 /*:14*//*15:*/
-#line 223 "cwebdir/comm-w2c.h"
+#line 230 "cwebdir/comm-w2c.h"
 
 extern void common_init(void);
 extern void print_stats(void);

Modified: trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h
===================================================================
--- trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2020-04-12 23:54:18 UTC (rev 54715)
+++ trunk/Build/source/texk/web2c/cwebdir/comm-w2c.h	2020-04-13 08:06:22 UTC (rev 54716)
@@ -41,7 +41,14 @@
 extern int program; /* \.{CWEAVE} or \.{CTANGLE} or \.{CTWILL}? */
 extern int phase; /* which phase are we in? */
 
-@ @d _(STRING) gettext(STRING)
+@ You may have noticed that almost all \.{"strings"} in the \.{CWEB} sources
+are placed in the context of the `|_|'~macro.  This is just a shortcut for the
+`|gettext|' function from the ``GNU~gettext utilities.'' For systems that do
+not have this library installed, we wrap things for neutral behavior without
+internationalization.
+
+ at d _(STRING) gettext(STRING)
+
 @<Include files@>=
 #ifndef HAVE_GETTEXT
 #define HAVE_GETTEXT 0



More information about the tex-live-commits mailing list.