texlive[65174] Build/source/texk/web2c/luatexdir: Make disc node

[commits+lscarso at tug.org]

Revision: 65174
          http://tug.org/svn/texlive?view=revision&revision=65174
Author:   lscarso
Date:     2022-12-03 12:09:48 +0100 (Sat, 03 Dec 2022)
Log Message:
-----------
Make disc node prev. pointers more uniform (M.Kruger)

Modified Paths:
--------------
    trunk/Build/source/texk/web2c/luatexdir/ChangeLog
    trunk/Build/source/texk/web2c/luatexdir/lang/texlang.c
    trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h

Modified: trunk/Build/source/texk/web2c/luatexdir/ChangeLog
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/ChangeLog	2022-12-03 00:50:22 UTC (rev 65173)
+++ trunk/Build/source/texk/web2c/luatexdir/ChangeLog	2022-12-03 11:09:48 UTC (rev 65174)
@@ -1,3 +1,6 @@
+2022-12-03  Luigi Scarso <luigi.scarso at gmail.com> 
+    * Make disc node prev. pointers more uniform (M.Krüger)
+
 2022-11-20  Luigi Scarso <luigi.scarso at gmail.com> 
     * set \variablefam = -1 as initial value (H.Hagen).
 

Modified: trunk/Build/source/texk/web2c/luatexdir/lang/texlang.c
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/lang/texlang.c	2022-12-03 00:50:22 UTC (rev 65173)
+++ trunk/Build/source/texk/web2c/luatexdir/lang/texlang.c	2022-12-03 11:09:48 UTC (rev 65174)
@@ -472,12 +472,7 @@
 void set_disc_field(halfword f, halfword t)
 {
     if (t != null) {
-        /*tex
-            No |couple_nodes(f, t);| as we can better not expose |f| as |prev|
-            pointer.
-        */
-        vlink(f) = t ;
-        alink(t) = null ;
+        couple_nodes(f, t);
         tlink(f) = tail_of_list(t);
     } else {
         vlink(f) = null;

Modified: trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h
===================================================================
--- trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h	2022-12-03 00:50:22 UTC (rev 65173)
+++ trunk/Build/source/texk/web2c/luatexdir/luatex_svnversion.h	2022-12-03 11:09:48 UTC (rev 65174)
@@ -1,4 +1,4 @@
 #ifndef luatex_svn_revision_h
 #define luatex_svn_revision_h
-#define luatex_svn_revision 7550
+#define luatex_svn_revision 7551
 #endif