From 2bac931485c08147db2b53c3c603c22d6a16c219 Mon Sep 17 00:00:00 2001
From: Luigi Scarso <luigi.scarso@gmail.com>
Date: Tue, 27 Dec 2022 15:19:32 +0100
Subject: [PATCH] complementaty patch for revision 7551 (lua end compatibility)
 (H.Hagen)

---
 source/texk/web2c/luatexdir/ChangeLog          |  3 +++
 source/texk/web2c/luatexdir/lua/lnodelib.c     | 18 +++++++++---------
 .../texk/web2c/luatexdir/luatex_svnversion.h   |  2 +-
 3 files changed, 13 insertions(+), 10 deletions(-)

diff --git a/source/texk/web2c/luatexdir/ChangeLog b/source/texk/web2c/luatexdir/ChangeLog
index 73a9e7f98..bca2c97a4 100644
--- a/source/texk/web2c/luatexdir/ChangeLog
+++ b/source/texk/web2c/luatexdir/ChangeLog
@@ -1,3 +1,6 @@
+2022-12-05  Luigi Scarso <luigi.scarso@gmail.com> 
+    * complementaty patch for revision 7551 (lua end compatibility) (H.Hagen)
+
 2022-12-03  Luigi Scarso <luigi.scarso@gmail.com> 
     * Track last node in ligature handling (M.Krüger)
 
diff --git a/source/texk/web2c/luatexdir/lua/lnodelib.c b/source/texk/web2c/luatexdir/lua/lnodelib.c
index 1ff36bc95..30538d0cf 100644
--- a/source/texk/web2c/luatexdir/lua/lnodelib.c
+++ b/source/texk/web2c/luatexdir/lua/lnodelib.c
@@ -1183,13 +1183,13 @@ static int lua_nodelib_direct_getdisc(lua_State * L)
 {
     halfword n = lua_tointeger(L, 1);
     if ((n) && (type(n) == disc_node)) {
-        nodelib_pushdirect_or_nil(vlink(pre_break(n)));
-        nodelib_pushdirect_or_nil(vlink(post_break(n)));
-        nodelib_pushdirect_or_nil(vlink(no_break(n)));
+        nodelib_pushdirect_or_nil_alink(vlink(pre_break(n)));
+        nodelib_pushdirect_or_nil_alink(vlink(post_break(n)));
+        nodelib_pushdirect_or_nil_alink(vlink(no_break(n)));
         if (lua_isboolean(L, 2) && lua_toboolean(L, 2)) {
-            nodelib_pushdirect_or_nil(tlink(pre_break(n)));
-            nodelib_pushdirect_or_nil(tlink(post_break(n)));
-            nodelib_pushdirect_or_nil(tlink(no_break(n)));
+            nodelib_pushdirect_or_nil_alink(tlink(pre_break(n)));
+            nodelib_pushdirect_or_nil_alink(tlink(post_break(n)));
+            nodelib_pushdirect_or_nil_alink(tlink(no_break(n)));
             return 6;
         }
         return 3;
@@ -4750,11 +4750,11 @@ static int lua_nodelib_fast_getfield(lua_State * L)
         if (lua_key_eq(s, subtype)) {
             lua_pushinteger(L, subtype(n));
         } else if (lua_key_eq(s, pre)) {
-            fast_metatable_or_nil(vlink(pre_break(n)));
+            fast_metatable_or_nil_alink(vlink(pre_break(n)));
         } else if (lua_key_eq(s, post)) {
-            fast_metatable_or_nil(vlink(post_break(n)));
+            fast_metatable_or_nil_alink(vlink(post_break(n)));
         } else if (lua_key_eq(s, replace)) {
-            fast_metatable_or_nil(vlink(no_break(n)));
+            fast_metatable_or_nil_alink(vlink(no_break(n)));
         } else if (lua_key_eq(s, penalty)) {
             lua_pushinteger(L, disc_penalty(n));
         } else {
diff --git a/source/texk/web2c/luatexdir/luatex_svnversion.h b/source/texk/web2c/luatexdir/luatex_svnversion.h
index 162a40a9b..4d376f978 100644
--- a/source/texk/web2c/luatexdir/luatex_svnversion.h
+++ b/source/texk/web2c/luatexdir/luatex_svnversion.h
@@ -1,4 +1,4 @@
 #ifndef luatex_svn_revision_h
 #define luatex_svn_revision_h
-#define luatex_svn_revision 7552
+#define luatex_svn_revision 7553
 #endif
-- 
GitLab