moving gathered luamml patch

Author: u-fischer

required/latex-lab/latex-lab-amsmath.dtx

@@ -117,6 +117,35 @@
       \ignorespacesafterend
     }  
    \math_register_halign_env:nn {gather}{} 
+%    \end{macrocode}
+%
+% the gathered environment needs various sockets for luamml support.
+%    \begin{macrocode}
+    \renewenvironment{gathered}[1][c]{%
+        \RIfM@\else
+            \nonmatherr@{\begin{gathered}}%
+        \fi
+%    \end{macrocode}
+% This annotates the space
+%    \begin{macrocode}
+        \UseTaggingSocket{ math/luamml/annotate/false } {}{ \alignedspace@left }
+        \ams@start@box{#1}\bgroup
+            \Let@ \chardef\dspbrk@context\@ne \restore@math@cr
+            \spread@equation
+            \ialign\bgroup
+                \hfil\strut@$\m@th\displaystyle##
+%    \end{macrocode}
+% This save the cell and then finalize it.
+%    \begin{macrocode}
+                \UseTaggingSocket{math/luamml/save/nNn}{ {} \displaystyle {mtd}}
+                $
+                \UseTaggingSocket{math/luamml/mtable/finalizecol}{last}
+                \hfil
+                \crcr
+        \ams@return@opt@arg
+    }{%
+      \endaligned
+    }  
  }
 %    \end{macrocode}
 %

texmf/tex/lualatex/luamml/luamml-patches-amsmath.sty

@@ -58,32 +58,36 @@
       \crcr
       \ams@return@opt@arg
 }
-
-\renewcommand \gathered [1] [c] {
-  \RIfM@
-  \else
-    \nonmatherr@ { \begin {gathered} }
-  \fi
-  \UseTaggingSocket{ math/luamml/annotate/false } {}{ \alignedspace@left }
-  \ams@start@box {#1} \bgroup
-    \Let@
-    \chardef \dspbrk@context \@ne
-    \restore@math@cr
-    \spread@equation
-    \ialign \bgroup
-        \hfil
-        \strut@
-        $
-          \m@th
-          \displaystyle
-          ##
-          \UseTaggingSocket{math/luamml/save/nNn}{ {} \displaystyle {mtd}}
-        $
-        \UseTaggingSocket{math/luamml/mtable/finalizecol}{last}
-        \hfil
-      \crcr
-        \ams@return@opt@arg
-}
+\IfPackageAtLeastTF{latex-lab-testphase-math}{2025-01-24}
+ {}
+ { 
+  \PackageInfo{luamml}{patching~gathered}
+     \renewcommand \gathered [1] [c] {
+       \RIfM@
+       \else
+         \nonmatherr@ { \begin {gathered} }
+       \fi
+       \UseTaggingSocket{ math/luamml/annotate/false } {}{ \alignedspace@left }
+       \ams@start@box {#1} \bgroup
+         \Let@
+         \chardef \dspbrk@context \@ne
+         \restore@math@cr
+         \spread@equation
+         \ialign \bgroup
+             \hfil
+             \strut@
+             $
+               \m@th
+               \displaystyle
+               ##
+               \UseTaggingSocket{math/luamml/save/nNn}{ {} \displaystyle {mtd}}
+             $
+             \UseTaggingSocket{math/luamml/mtable/finalizecol}{last}
+             \hfil
+           \crcr
+             \ams@return@opt@arg
+     }
+  }   
 
 \cs_set:Npn \endaligned {
       \crcr
@@ -257,22 +261,22 @@
        \UseTaggingSocket{math/luamml/mtable/tag/save}
      }
     }
- }   
-
-\cs_set:Npn \endalign {
-  \math@cr
-  \black@ \totwidth@
-  \UseTaggingSocket{math/luamml/mtable/finalize} {align}
-  \egroup
-  \ifingather@
-    \restorealignstate@
-    \egroup
-    \nonumber
-    \ifnum0=`{\fi\iffalse}\fi
-  \else
-    $$
-  \fi
-  \ignorespacesafterend
+% this handled in latex-lab through \common@align@ending    
+    \cs_set:Npn \endalign {
+      \math@cr
+      \black@ \totwidth@
+      \UseTaggingSocket{math/luamml/mtable/finalize} {align}
+      \egroup
+      \ifingather@
+        \restorealignstate@
+        \egroup
+        \nonumber
+        \ifnum0=`{\fi\iffalse}\fi
+      \else
+        $$
+      \fi
+      \ignorespacesafterend
+    }
 }
 
 % For a more interesting one, let's consider multline: