mathfam256 (14sep19)

git-svn-id: svn://tug.org/texlive/trunk@52091 c570f23f-e606-0410-a88d-b1316a301751

1 files changed, 53 insertions, 8 deletions

diff --git a/Master/texmf-dist/tex/latex/mathfam256/mathfam256.sty b/Master/texmf-dist/tex/latex/mathfam256/mathfam256.sty
index 9749f8f8972..6b0fb9dc7e2 100644
--- a/Master/texmf-dist/tex/latex/mathfam256/mathfam256.sty
+++ b/Master/texmf-dist/tex/latex/mathfam256/mathfam256.sty
@@ -1,6 +1,9 @@
 %
 % mathfam256.sty
+% 2019/09/14 v0.3  Hironobu Yamashita (aminophen)
+%   -- bug fix and support LaTeX2e 2019-10-01
 % 2018/01/22 v0.2  Hironobu Yamashita (aminophen)
+%   -- first CTAN version
 % 2016/12/26 v0.1  Hironobu Yamashita (aminophen)
 % 2009/02/20 v0.01 Kazuyoshi Yamamoto (ymt)
 %
@@ -13,7 +16,7 @@
 
 \NeedsTeXFormat{LaTeX2e}
 \ProvidesPackage{mathfam256}
-  [2018/01/22 v0.2 Extend math family up to 256]
+  [2019/09/14 v0.3 Extend math family up to 256]
 
 %% engine check
 \ifx\omathchar\@undefined
@@ -24,9 +27,11 @@
     * upLaTeX (run on e-upTeX)\MessageBreak
     * Lamed (run on Aleph)\MessageBreak
     It seems you are running unsupported engine}\@ehc
+  \expandafter\endinput
 \fi
 \ifx\numexpr\@undefined
   \PackageError{mathfam256}{This package requires e-TeX features}\@ehc
+  \expandafter\endinput
 \fi
 
 %% engine check has been done, so always 256
@@ -93,6 +98,20 @@
     {\e@alloc\mathgroup\chardef{\count18}\m@ne\e@mathgroup@top}%
 }
 
+%% LaTeX2e 2019/10/01 makes lots of commands robust;
+%% follow both old and new behavior
+\edef\omfcclvi@reset{%
+  \catcode`\noexpand\&=\the\catcode`\&\relax
+  \catcode`\noexpand\~=\the\catcode`\~\relax
+  \let\noexpand\omfcclvi@reset\noexpand\@undefined}
+\@ifl@t@r\fmtversion{2019/10/01}{%
+  \catcode`\&=9\relax
+  \catcode`\~=14\relax
+}{%
+  \catcode`\&=14\relax
+  \catcode`\~=9\relax
+}
+
 %% use \omath... primitives for low-level commands
 \def\set@mathchar#1#2#3#4{%
   \ifnum#1<\sixt@@n
@@ -114,6 +133,7 @@
   \else
     \xdef#2{\omathaccent"\mathchar@type#3\hexnumber@@#100#4\relax}%
   \fi
+& \MakeRobust#2%
 }
 \def\set@mathdelimiter#1#2#3#4#5#6{%
   \@tempswatrue
@@ -125,6 +145,7 @@
     \xdef#3{\odelimiter"\mathchar@type#4\hexnumber@@#100#5%
                        "\hexnumber@@#200#6\relax}%
   \fi
+& \MakeRobust#3%
 }
 \def\set@@mathdelimiter#1#2#3#4#5{%
   \@tempswatrue
@@ -302,13 +323,19 @@
   \ifin@
     \begingroup
       \if\relax\noexpand#1% is command?
-        \edef\reserved@a{\noexpand\in@{\string\mathchar}{\meaning#1}}%
+&       \edef\reserved@b{\expandafter\noexpand
+&                        \csname\expandafter\@gobble\string#1\space\endcsname}%
+        \edef\reserved@a
+          {\noexpand\in@{\expandafter\@gobble\string\mathchar}%
+~                       {\meaning#1}}%
+&                       {\meaning#1\expandafter\meaning\reserved@b}}%
         \reserved@a
+&       \global\expandafter\let\reserved@b\@undefined
         \ifin@
           \oset@mathsymbol{#1}{#2}{#3}{#4}%
           \@font@info{Redeclaring math symbol \string#1}%
         \else
-            \expandafter\ifx
+          \expandafter\ifx
             \csname\expandafter\@gobble\string#1\endcsname
             \relax
             \oset@mathsymbol{#1}{#2}{#3}{#4}%
@@ -341,9 +368,16 @@
   \ifin@
     \begingroup
       \if\relax\noexpand#1% is command?
-        \edef\reserved@a{\noexpand\in@{\string\mathaccent}{\meaning#1}}%
+        \edef\reserved@a{\noexpand\in@
+~          {\expandafter\@gobble\string\mathaccent}{\meaning#1}}%
+&         {\expandafter\@gobble\string\mathaccent}
+&         {\expandafter\meaning
+&          \csname\expandafter\@gobble\string#1\space\endcsname}}%
         \reserved@a
         \ifin@
+&         \expandafter\let
+&           \csname\expandafter\@gobble\string#1\space\endcsname
+&           \@undefined
           \oset@mathaccent{#1}{#2}{#3}{#4}%
           \@font@info{Redeclaring math accent \string#1}%
         \else
@@ -367,7 +401,9 @@
 \def\oset@mathaccent#1#2#3#4{%
   \xdef#1{\omathaccent%
     \number
-    \numexpr"1000000*\mathchar@type#2+"10000*\csname sym#3\endcsname+#4}}
+    \numexpr"1000000*\mathchar@type#2+"10000*\csname sym#3\endcsname+#4}%
+& \MakeRobust#1%
+}
 \@onlypreamble\oset@mathaccent
 %\def\DeclareMathDelimiter#1{%
 %  \if\relax\noexpand#1%
@@ -398,13 +434,17 @@
        \expandafter{\group@list}%
     \ifin@
       \begingroup
-        \edef\reserved@a{\noexpand\in@{\string\delimiter}{\meaning#1}}%
+        \edef\reserved@a{\noexpand\in@
+          {\expandafter\@gobble\string\delimiter}%
+~         {\meaning#1}}%
+&         {\expandafter\meaning\csname\expandafter\@gobble\string#1\space\endcsname}}%
         \reserved@a
         \ifin@
+&         \expandafter\let\csname\expandafter\@gobble\string#1\space\endcsname\@undefined
           \oset@mathdelimiter{#1}{#2}{#3}{#4}{#5}{#6}%
           \@font@info{Redeclaring math delimiter \string#1}%
         \else
-            \expandafter\ifx
+          \expandafter\ifx
             \csname\expandafter\@gobble\string#1\endcsname
             \relax
             \oset@mathdelimiter{#1}{#2}{#3}{#4}{#5}{#6}%
@@ -445,6 +485,7 @@
     \numexpr"10000*\csname sym#5\endcsname+#6%
   \xdef#1{\odelimiter\number\count\z@\space \number\count\tw@}%
   \endgroup
+& \MakeRobust#1%
 }
 \@onlypreamble\oset@mathdelimiter
 \def\oset@@mathdelimiter#1#2#3#4#5{%
@@ -461,7 +502,8 @@
        \relax
      \let#1\radical
   \fi
-  \edef\reserved@a{\noexpand\in@{\string\radical}{\meaning#1}}%
+  \edef\reserved@a{\noexpand\in@
+       {\expandafter\@gobble\string\radical}{\meaning#1}}%
   \reserved@a
   \ifin@
     \expandafter\in@\csname sym#2\expandafter\endcsname
@@ -491,5 +533,8 @@
 }
 \@onlypreamble\oset@mathradical
 
+%% reset
+\omfcclvi@reset
+
 %% all done
 \endinput