From f4f37f67209a9959cb3449da05ecc012bf3bad92 Mon Sep 17 00:00:00 2001
From: Luigi Scarso <luigi.scarso@gmail.com>
Date: Mon, 23 May 2022 11:06:24 +0000
Subject: [PATCH] Fixed mp_begin_iteration (H.Hagen)

[[Split portion of a mixed commit.]]
---
 source/texk/web2c/luatexdir/ChangeLog           | 3 +++
 source/texk/web2c/luatexdir/luatex_svnversion.h | 2 +-
 source/texk/web2c/mplibdir/mp.w                 | 2 +-
 3 files changed, 5 insertions(+), 2 deletions(-)

diff --git a/source/texk/web2c/luatexdir/ChangeLog b/source/texk/web2c/luatexdir/ChangeLog
index 98bf305cf..70497ad9b 100644
--- a/source/texk/web2c/luatexdir/ChangeLog
+++ b/source/texk/web2c/luatexdir/ChangeLog
@@ -1,3 +1,6 @@
+2022-05-23  Luigi Scarso <luigi.scarso@gmail.com>
+    * Fixed mp_begin_iteration (H.Hagen)
+
 2022-05-15  Luigi Scarso <luigi.scarso@gmail.com>
     * Fixed a memory leak in mplib (H.Hagen)
 
diff --git a/source/texk/web2c/luatexdir/luatex_svnversion.h b/source/texk/web2c/luatexdir/luatex_svnversion.h
index 03da6264f..26ff11b26 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 7526
+#define luatex_svn_revision 7527
 #endif
diff --git a/source/texk/web2c/mplibdir/mp.w b/source/texk/web2c/mplibdir/mp.w
index 099004e36..1c707957c 100644
--- a/source/texk/web2c/mplibdir/mp.w
+++ b/source/texk/web2c/mplibdir/mp.w
@@ -21169,7 +21169,7 @@ void mp_begin_iteration (MP mp) {
       p->value_mod = mp_suffix_sym;
     }
     mp_get_x_next (mp);
-    if (cur_cmd() == mp_within_token) {
+    if (p->value_mod = mp_expr_sym && cur_cmd() == mp_within_token) {
       @<Set up a picture iteration@>;
     } else {
       @<Check for the assignment in a loop header@>;
-- 
GitLab