diff options
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-zapspace.tex')
-rw-r--r-- | Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-zapspace.tex | 105 |
1 files changed, 105 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-zapspace.tex b/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-zapspace.tex new file mode 100644 index 00000000000..f421a5ed6e5 --- /dev/null +++ b/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-zapspace.tex @@ -0,0 +1,105 @@ +%% +%% This is file `ltxcmds-test-zapspace.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% ltxcmds.dtx (with options: `test-zapspace') +%% +%% This is a generated file. +%% +%% Copyright (C) 2009-2011 by +%% Heiko Oberdiek <heiko.oberdiek at googlemail.com> +%% +%% This work may be distributed and/or modified under the +%% conditions of the LaTeX Project Public License, either +%% version 1.3c of this license or (at your option) any later +%% version. This version of this license is in +%% http://www.latex-project.org/lppl/lppl-1-3c.txt +%% and the latest version of this license is in +%% http://www.latex-project.org/lppl.txt +%% and version 1.3 or later is part of all distributions of +%% LaTeX version 2005/12/01 or later. +%% +%% This work has the LPPL maintenance status "maintained". +%% +%% This Current Maintainer of this work is Heiko Oberdiek. +%% +%% The Base Interpreter refers to any `TeX-Format', +%% because some files are installed in TDS:tex/generic//. +%% +%% This work consists of the main source file ltxcmds.dtx +%% and the derived files +%% ltxcmds.sty, ltxcmds.pdf, ltxcmds.ins, ltxcmds.drv, +%% ltxcmds-test1.tex, ltxcmds-test-gobble.tex, +%% ltxcmds-test-ifempty.tex, ltxcmds-test-zapspace.tex, +%% ltxcmds-test-ifboxempty.tex. +%% +\catcode`\{=1 % +\catcode`\}=2 % +\catcode`\#=6 % +\catcode`\@=11 % +\errorcontextlines=1000 % +\begingroup\expandafter\expandafter\expandafter\endgroup +\expandafter\ifx\csname RequirePackage\endcsname\relax + \input ltxcmds.sty\relax +\else + \RequirePackage{ltxcmds}[2011/03/16]% +\fi +\def\msg#{\immediate\write16} +\def\space{ } +\def\empty{} +\msg{* \string\ltx@zapspace} +\long\def\test#1#2{% + \begingroup + \def\TestInput{#1}% + \def\TestExpected{#2}% + % Test \ltx@zapspace + \expandafter\expandafter\expandafter\def + \expandafter\expandafter\expandafter\TestResult + \expandafter\expandafter\expandafter{% + \ltx@zapspace{#1}% + }% + \ifx\TestResult\TestExpected + \msg{* Test OK}% + \else + \ltx@onelevel@sanitize\TestInput + \ltx@onelevel@sanitize\TestExpected + \ltx@onelevel@sanitize\TestResult + \msg{* Input: \space\space\space[\TestInput]}% + \msg{ \space Result: \space\space[\TestResult]}% + \msg{ \space Expected: [\TestExpected]}% + \errmessage{Test failed!}% + \fi + \endgroup +} +\long\def\etest#1#2{% + \begingroup + \edef\x{\endgroup + \noexpand\test{#1}{#2}% + }% + \x +} +\catcode`\~=13 % +\let~\noexpand +\test{}{} +\test{{}}{{}} +\test{ {}}{{}} +\test{{ }}{{ }} +\test{{} }{{}} +\test{ {} }{{}} +\test{ { } }{{ }} +\test{a {b} c}{a{b}c} +\test{a bb ccc}{abbccc} +\test{{a} {bb} {ccc}}{{a}{bb}{ccc}} +\test{\par}{\par} +\test{\if}{\if} +\test{\space}{\space} +\etest{\par\space\par}{\par\par} +\etest{~\empty\space~\empty}{~\empty~\empty} +\etest{~\fi\space~\else\space}{~\fi~\else} +\csname @@end\endcsname\end + +\endinput +%% +%% End of file `ltxcmds-test-zapspace.tex'. |