[latex3-commits] [l3svn] 10/10: l3build: Avoid e-TeX

[noreply at latex-project.org]

This is an automated email from the git hooks/post-receive script.

joseph pushed a commit to branch master
in repository l3svn.

commit f4e6e256e2ccdfc469c9231b5dc12137b225158c
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Thu Jun 22 15:46:42 2017 +0100

    l3build: Avoid e-TeX
    
    At least for the moment: we don't check for e-TeX up-front and as
    a generic testing suite we probably should use just TeX90 ...
---
 l3build/l3build.dtx |   18 ++++++++++++++++--
 1 file changed, 16 insertions(+), 2 deletions(-)

diff --git a/l3build/l3build.dtx b/l3build/l3build.dtx
index 8ddca4d..466f0f0 100644
--- a/l3build/l3build.dtx
+++ b/l3build/l3build.dtx
@@ -1462,6 +1462,16 @@
 %     \end{macrocode}
 % \end{macro}
 %
+% \begin{macro}{\@onelevel at sanitize, \strip at prefix}
+%   A couple of copies from \LaTeXe{}.
+%    \begin{macrocode}
+\def\@onelevel at sanitize#1{%
+  \edef#1{\expandafter\strip at prefix\meaning #1}%
+}
+\def\strip at prefix#1>{}
+%    \end{macrocode}
+% \end{macro}
+%
 % \begin{macro}
 %   {\SEPARATOR, \TEST, \TESTEXP, \TRUE, \FALSE, \YES, \NO, \NEWLINE}
 %   We are not starved for space in the log file output, so let's make it as
@@ -1475,7 +1485,9 @@
 \long\def\TEST#1#2{%
   \global\advance\gTESTint by 1 %
   \SEPARATOR
-  \LONGTYPEOUT{TEST \the\gTESTint: \detokenize{#1}}%
+  \def\@tempa{#1}%
+  \@onelevel at sanitize\@tempa
+  \LONGTYPEOUT{TEST \the\gTESTint: \@tempa}%
   \SEPARATOR
   \begingroup
     \let\TYPE\LONGTYPEOUT
@@ -1487,8 +1499,10 @@
 \long\def\TESTEXP#1#2{%
   \global\advance\gTESTint by 1 %
   \SEPARATOR
+  \def\@tempa{#1}%
+  \@onelevel at sanitize\@tempa
   \LONGTYPEOUT{%
-    TEST \the\gTESTint: \detokenize{#1}}%
+    TEST \the\gTESTint: \@tempa}%
   \SEPARATOR
   \begingroup
     \long\def\TYPE##1{##1}%

-- 
To stop receiving notification emails like this one, please contact
the administrator of this repository.