[latex3-commits] [git/LaTeX3-latex3-latex3] l3text: Support \(h|v)phantom (1374c22e4)

[Joseph Wright]

Repository : https://github.com/latex3/latex3
On branch  : l3text
Link       : https://github.com/latex3/latex3/commit/1374c22e44c12154c581f6e28bd767e1c4b629ad

>---------------------------------------------------------------

commit 1374c22e44c12154c581f6e28bd767e1c4b629ad
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Sun Dec 15 21:05:17 2019 +0000

    Support \(h|v)phantom


>---------------------------------------------------------------

1374c22e44c12154c581f6e28bd767e1c4b629ad
 l3kernel/l3text.dtx | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)

diff --git a/l3kernel/l3text.dtx b/l3kernel/l3text.dtx
index e544eda7d..034cf89c2 100644
--- a/l3kernel/l3text.dtx
+++ b/l3kernel/l3text.dtx
@@ -3860,6 +3860,27 @@
   }
 %    \end{macrocode}
 % \end{macro}
+% \begin{macro}[rEXP]
+%   {
+%     \@@_purify_unimath_\hphantom:nw ,
+%     \@@_purify_unimath_\vphantom:nw ,
+%     \@@_purify_unimath_\phantom:nw
+%   }
+%   Gobble non-useful arguments but yielding a space.
+%    \begin{macrocode}
+\cs_new:cpn { @@_purify_unimath_ \token_to_str:N \vphantom :nw } #1#2
+  { \@@_purify_unimath_loop:nw {#1} }
+\tl_map_inline:nn
+  { \hphantom \phantom }
+  {
+    \cs_new:cpn { @@_purify_unimath_ \token_to_str:N #1 :nw } ##1##2
+      {
+        \c_space_tl
+        \@@_purify_unimath_loop:nw {##1}
+      }
+  }
+%    \end{macrocode}
+% \end{macro}
 % \begin{macro}[rEXP]{\@@_purify_unimath_\sqrt:nw}
 % \begin{macro}[rEXP]{\@@_purify_unimath_\sqrt_aux:nw}
 %   Square root is tricky to handle; at the present, just dump the