diff options
author | Karl Berry <karl@freefriends.org> | 2017-07-02 21:13:29 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2017-07-02 21:13:29 +0000 |
commit | efc6324a9b0ff04182c5a6683d271c43f33b28d5 (patch) | |
tree | d3f302539e594922cdff2cf47b0282212657728c /Master/texmf-dist/tex/latex/l3build/regression-test.tex | |
parent | d79b225e640990e67c41ed4a3631350e84d05a0e (diff) |
l3build (2jul17)
git-svn-id: svn://tug.org/texlive/trunk@44741 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/latex/l3build/regression-test.tex')
-rw-r--r-- | Master/texmf-dist/tex/latex/l3build/regression-test.tex | 25 |
1 files changed, 12 insertions, 13 deletions
diff --git a/Master/texmf-dist/tex/latex/l3build/regression-test.tex b/Master/texmf-dist/tex/latex/l3build/regression-test.tex index eae274e09f6..4c12a1d5444 100644 --- a/Master/texmf-dist/tex/latex/l3build/regression-test.tex +++ b/Master/texmf-dist/tex/latex/l3build/regression-test.tex @@ -101,30 +101,29 @@ ============================================================% }% } -\long\def\TEST#1#2{% +\protected\long\def\BEGINTEST#1{% \global\advance\gTESTint by 1 % \SEPARATOR \LONGTYPEOUT{TEST \the\gTESTint: \detokenize{#1}}% \SEPARATOR \begingroup \let\TYPE\LONGTYPEOUT - #2% + +} +\protected\long\def\ENDTEST{% \endgroup \SEPARATOR \LONGTYPEOUT{}% } +\long\def\TEST#1#2{% + \BEGINTEST{#1}% + #2% + \ENDTEST +} \long\def\TESTEXP#1#2{% - \global\advance\gTESTint by 1 % - \SEPARATOR - \LONGTYPEOUT{% - TEST \the\gTESTint: \detokenize{#1}}% - \SEPARATOR - \begingroup - \long\def\TYPE##1{##1}% - \LONGTYPEOUT{#2}% - \endgroup - \SEPARATOR - \LONGTYPEOUT{}% + \BEGINTEST{#1}% + \LONGTYPEOUT{#2}% + \ENDTEST } \def \TRUE {\TYPE{TRUE}} \def \FALSE {\TYPE{FALSE}} |