texlive[71493] Build/source/texk/web2c/hitexdir/hitex.w: [HiTeX]

commits+ascherer at tug.org commits+ascherer at tug.org
Wed Jun 12 10:40:15 CEST 2024


Revision: 71493
          https://tug.org/svn/texlive?view=revision&revision=71493
Author:   ascherer
Date:     2024-06-12 10:40:15 +0200 (Wed, 12 Jun 2024)
Log Message:
-----------
[HiTeX] Purge spurious \macro inserts.

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/hitexdir/hitex.w

Modified: trunk/Build/source/texk/web2c/hitexdir/hitex.w
===================================================================
--- trunk/Build/source/texk/web2c/hitexdir/hitex.w	2024-06-12 08:40:13 UTC (rev 71492)
+++ trunk/Build/source/texk/web2c/hitexdir/hitex.w	2024-06-12 08:40:15 UTC (rev 71493)
@@ -13912,21 +13912,20 @@
 @ When a box is being appended to the current vertical list, the
 baselineskip calculation is handled by the |append_to_vlist| routine.
 
- at p static void append_to_vlist(pointer @!b)@t\2\2@>@/
-{ bool height_known;@t\1@>@/
+ at p static void append_to_vlist(pointer @!b)
+{ @+bool height_known;
   height_known=(type(b)==hlist_node || type(b)==vlist_node ||@|
 	   (type(b)==whatsit_node && subtype(b)==hset_node));@/
   if (prev_depth > ignore_depth && height_known)@/
-  {@+scaled d;@t\1@> /*deficiency of space between baselines*/
+  {@+scaled d; /*deficiency of space between baselines*/
     pointer @!p; /*a new glue node*/
-  {@+d=width(baseline_skip)-prev_depth-height(b);
+  d=width(baseline_skip)-prev_depth-height(b);
   if (d < line_skip_limit) p=new_param_glue(line_skip_code);
   else{@+p=new_skip_param(baseline_skip_code);
     width(temp_ptr)=d; /*|temp_ptr==glue_ptr(p)|*/
     }
   link(tail)=p;tail=p;
-  }@+
-} @+  else @+if (prev_depth<=unknown_depth || prev_depth>ignore_depth )@t\2@>@/
+} @+  else @+if (prev_depth<=unknown_depth || prev_depth>ignore_depth ) @/
   {@+pointer p;
 	p=new_baseline_node(baseline_skip, line_skip, line_skip_limit);
     link(tail)= p;tail= p;
@@ -18251,8 +18250,8 @@
 second pass, and |cur_p| points to a glue node.
 
 @p
-static void hyphenate_word(void)@t\2\2@>@/
-{ pointer @!q, @!s, @!prev_s;@t\1@> /*miscellaneous nodes of temporary interest*/
+static void hyphenate_word(void)
+{ @+pointer @!q, @!s, @!prev_s; /*miscellaneous nodes of temporary interest*/
   small_number @!j; /*an index into |hc| or |hu|*/
   uint8_t @!c; /*character being considered for hyphenation*/
 



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