playing around, not serious

latex3 · Jan 22, 2021 · 25c16dc · 25c16dc
1 parent 682b0ba
commit 25c16dc
Show file tree

Hide file tree

Showing 11 changed files with 2,159 additions and 2 deletions.
diff --git a/base/latexrelease.dtx b/base/latexrelease.dtx
@@ -40,8 +40,8 @@
 %<*!fixltx2e>
 % \fi
 %         \ProvidesFile{latexrelease.dtx}
-          [2020/12/06 v1.0k LaTeX release emulation and tests
-              (including releases up to \latexreleaseversion)]
+%<latexrelease|driver>  [2021/01/22 v1.0l LaTeX release emulation and tests
+%<latexrelease|driver>  (including releases up to \latexreleaseversion)]
 % \iffalse
 %</!fixltx2e>
 %<*driver>
@@ -483,6 +483,70 @@ of this package available from CTAN}
 %    \end{macrocode}
 %
 %
+% \section{Ignoring \texttt{_new} errors when rolling back}
+%
+%    \begin{macrocode}
+\ExplSyntaxOn
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN \cs_if_free:NF \__latexrelease_cs_if_free:NF
+\cs_set_eq:NN \__kernel_chk_if_free_cs:N \__latexrelease___kernel_chk_if_free_cs:N
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN \__kernel_msg_error:nnx \__latexrelease___kernel_msg_error:nnx
+\cs_set_eq:NN \__kernel_msg_new:nn  \__latexrelease___kernel_msg_new:nn
+\cs_set_eq:NN \__kernel_msg_new:nnn \__latexrelease___kernel_msg_new:nnn
+\cs_set_eq:NN \msg_new:nn   \__latexrelease_msg_new:nn
+\cs_set_eq:NN \msg_new:nnn  \__latexrelease_msg_new:nnn
+\cs_set_eq:NN \msg_new:nnnn \__latexrelease_msg_new:nnnn
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\def\declarecommand{\@star@or@long\declare@command}
+\def\declare@command#1{%
+  \ifx#1\@undefined
+    \expandafter\new@command
+  \else
+    \expandafter\renew@command
+  \fi
+  #1}
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN\NewDocumentCommand\__latexrelease_NewDocumentCommand
+\cs_set_eq:NN\newcommand        \declarecommand
+%    \end{macrocode}
+%
+%    The new definitions while rolling back:
+%    \begin{macrocode}
+\cs_set_eq:NN \cs_if_free:NF \use_none:nn
+\cs_set_eq:NN \__kernel_chk_if_free_cs:N \use_none:n
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN \__kernel_msg_error:nnx  \__kernel_msg_warning:nnx  % not sure what else is there
+\cs_set_eq:NN \__kernel_msg_new:nn     \__kernel_msg_set:nn
+\cs_set_eq:NN \__kernel_msg_new:nnn    \__kernel_msg_set:nnn
+\cs_set_eq:NN \msg_new:nn   \msg_set:nn
+\cs_set_eq:NN \msg_new:nnn  \msg_set:nnn
+\cs_set_eq:NN \msg_new:nnnn \msg_set:nnnn
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN \NewDocumentCommand\DeclareDocumentCommand
+\cs_set_eq:NN \newcommand        \DeclareRobustCommand      % should really become robust but for now 
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\msg_redirect_name:nnn  {hooks} {exists} {none}
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\ExplSyntaxOff
+%    \end{macrocode}
+%
 % \section{Individual  Changes}
 %
 % The code for each change will be inserted at this point, extracted
@@ -492,6 +556,43 @@ of this package available from CTAN}
 %</latexrelease>
 %    \end{macrocode}
 %
+%
+% \section{Undoing the temp modifications}
+%
+%    \begin{macrocode}
+%<*latexrelease-finish>
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\ExplSyntaxOn
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\cs_set_eq:NN \cs_if_free:NF \__latexrelease_cs_if_free:NF
+\cs_set_eq:NN  \__kernel_chk_if_free_cs:N \__latexrelease___kernel_chk_if_free_cs:N
+\cs_set_eq:NN \__kernel_msg_error:nnx \__latexrelease___kernel_msg_error:nnx
+\cs_set_eq:NN \__kernel_msg_new:nn \__latexrelease___kernel_msg_new:nn
+\cs_set_eq:NN \__kernel_msg_new:nn \__latexrelease___kernel_msg_new:nnn
+\cs_set_eq:NN \msg_new:nn   \__latexrelease_msg_new:nn
+\cs_set_eq:NN \msg_new:nnn  \__latexrelease_msg_new:nnn
+\cs_set_eq:NN \msg_new:nnnn \__latexrelease_msg_new:nnnn
+\cs_set_eq:NN \NewDocumentCommand \__latexrelease_NewDocumentCommand
+\cs_set_eq:NN \newcommand        \__latexrelease_newcommand
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\msg_redirect_name:nnn  {hooks} {exists} {}
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+\ExplSyntaxOff
+%    \end{macrocode}
+%
+%    \begin{macrocode}
+%</latexrelease-finish>
+%    \end{macrocode}
+% 
+%
 % \section{fixltx2e}
 %
 % Generate a stub \Lpack{fixltx2e} package:

diff --git a/base/latexrelease.ins b/base/latexrelease.ins
@@ -132,6 +132,7 @@ extension .ins) which are part of the distribution.
   \from{ltoutput.dtx}    {latexrelease}%
   \from{ltfsscmp.dtx}    {latexrelease}% only in latexrelease!
   \from{ltfinal.dtx}     {latexrelease}%
+  \from{latexrelease.dtx}{latexrelease-finish}%
 }
 
 

diff --git a/base/testfiles/github-0479.lvt b/base/testfiles/github-0479.lvt
@@ -0,0 +1,22 @@
+% rolling back to first time lthooks
+
+\input{regression-test}
+
+\START
+
+
+\RequirePackage[2020/10/01]{latexrelease}
+
+
+\OMIT
+
+\documentclass{minimal}
+
+\begin{document}
+
+\TIMO
+
+test
+
+\end{document}
+