%% %% This is file `uniquecounter-test3.tex', %% generated with the docstrip utility. %% %% The original source files were: %% %% uniquecounter.dtx (with options: `test3') %% %% This is a generated file. %% %% Copyright (C) 2009 by %% Heiko Oberdiek %% %% 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 uniquecounter.dtx %% and the derived files %% uniquecounter.sty, uniquecounter.pdf, uniquecounter.ins, %% uniquecounter.drv, uniquecounter-example.tex, %% uniquecounter-test1.tex, uniquecounter-test2.tex, %% uniquecounter-test3.tex. %% \input uniquecounter.sty\relax \catcode`\@=11 % \def\CheckValue#1#2{% \begingroup \edef\A{#2}% \edef\B{\UniqueCounterGet{#1}}% \ifx\A\B \else \@PackageError{TEST}{Failed: \A\space<> \B}\@ehc \fi \endgroup } \def\CheckSpace#1{% \setbox0=\hbox{#1}% \ifdim\wd0=\z@ \else \@PackageError{TEST}{Failed: 0.0pt <> \the\wd0}\@ehc \fi } \begingroup \CheckSpace{% \UniqueCounterNew{test}% }% \CheckValue{test}{0}% \endgroup \begingroup \CheckSpace{% \UniqueCounterIncrement{test}% }% \CheckValue{test}{1}% \def\uqc@cnt@test{2147483645}% \CheckValue{test}{2147483645}% \CheckSpace{% \UniqueCounterIncrement{test}% }% \CheckValue{test}{2147483646}% \CheckSpace{% \UniqueCounterIncrement{test}% }% \ifx\uqc@inc\uqc@NumInc \else \@PackageError{TEST}{Failed: wrong inc function}\@ehc \fi \CheckValue{test}{2147483647}% \CheckSpace{% \UniqueCounterIncrement{test}% }% \CheckValue{test}{2147483648}% \CheckSpace{% \UniqueCounterIncrement{test}% }% \CheckValue{test}{2147483649}% \endgroup \begingroup \def\CheckCall#1#2{% \begingroup \def\A{#1}% \def\B{#2}% \ifx\A\B \else \@PackageError{TEST}{Failed: \A\space <> \B}\@ehc \fi \endgroup }% \CheckSpace{% \UniqueCounterNew{foo}% }% \CheckValue{foo}{0}% \CheckSpace{% \UniqueCounterCall{foo}{\CheckCall}{1}% }% \CheckSpace{% \UniqueCounterCall{foo}{\CheckCall}{2}% }% \CheckValue{foo}{2}% \endgroup \csname @@end\endcsname\end \endinput %% %% End of file `uniquecounter-test3.tex'.