diff --git a/source/texk/web2c/luatexdir/ChangeLog b/source/texk/web2c/luatexdir/ChangeLog
index 73a9e7f98e4f7e1cd0fca6bcbdaa114a99e32cd0..bca2c97a43275b710e07750a8c3ac2829c38fdf6 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 1ff36bc955c022440bd870ec6ce67e2b950df7f4..30538d0cf4fb98b4009f17fa0f04159f02294520 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 162a40a9b6c1e77066b9f6f32d648e9163e84d7e..4d376f97808b2f74e3143ca212fde0e2a132be58 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