diff options
author | Karl Berry <karl@freefriends.org> | 2011-04-12 22:56:39 +0000 |
---|---|---|
committer | Karl Berry <karl@freefriends.org> | 2011-04-12 22:56:39 +0000 |
commit | 3c9b5c2960ae2455180bdb3a4e67bf10175b39af (patch) | |
tree | 53ac9731c23e82f60349ec920ed8d816738913dc /Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex | |
parent | f437333cf5d63d69f5ab9fd1eb553af4175037d0 (diff) |
oberdiek (12apr11)
git-svn-id: svn://tug.org/texlive/trunk@22061 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex')
-rw-r--r-- | Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex | 130 |
1 files changed, 130 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex b/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex new file mode 100644 index 00000000000..d7f5edb53db --- /dev/null +++ b/Master/texmf-dist/doc/latex/oberdiek/test/ltxcmds-test-ifboxempty.tex @@ -0,0 +1,130 @@ +%% +%% This is file `ltxcmds-test-ifboxempty.tex', +%% generated with the docstrip utility. +%% +%% The original source files were: +%% +%% ltxcmds.dtx (with options: `test-ifboxempty') +%% +%% 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 % +\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} + % make box 0 void +\begingroup + \setbox0=\box0 % +\endgroup +\ifvoid0 % +\else + \errmessage{Voiding box 0 failed}% +\fi +\setbox2=\box0 % +\def\test#1#2{% + \@test{#1}{#2}% + \@@test{#1}{#2}% + \chardef\x=#1% + \@test\x{#2}% + \@@test\x{#2}% +} +\def\@test#1#2{% + \begingroup + \setbox9=\hbox{% + \def\TestExpected{#2}% + \ltx@IfBoxEmpty{#1}{% + \def\TestResult{Y}% + }{% + \def\TestResult{N}% + }% + \ifx\TestExpected\TestResult + \msg{* Test passed.}% + \else + \errmessage{Test failed!}% + \fi + }% + \ifdim\wd9=0pt % + \else + \errmessage{Unwanted space?}% + \fi + \endgroup +} +\def\@@test#1#2{% + \begingroup + \setbox9=\hbox{% + \def\TestExpected{#2}% + \ifvoid#1\def\TestExpected{Y}\fi + \ltx@IfBoxVoidOrEmpty{#1}{% + \def\TestResult{Y}% + }{% + \def\TestResult{N}% + }% + \ifx\TestExpected\TestResult + \msg{* Test passed.}% + \else + \errmessage{Test failed!}% + \fi + }% + \ifdim\wd9=0pt % + \else + \errmessage{Unwanted space?}% + \fi + \endgroup +} +\test0N +\test2N +\setbox0=\hbox{} +\test0Y +\setbox2=\hbox{} +\test2Y +\setbox0=\vbox{} +\test0Y +\setbox2=\vbox{} +\test0Y +\setbox0=\hbox{ }% +\test0N +\setbox2=\hbox{ }% +\test2N +\setbox0=\hbox{\penalty1}% +\test0N +\setbox2=\hbox{\penalty1}% +\test2N +\csname @@end\endcsname\end + +\endinput +%% +%% End of file `ltxcmds-test-ifboxempty.tex'. |