summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/oberdiek/test
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2009-09-22 23:13:21 +0000
committerKarl Berry <karl@freefriends.org>2009-09-22 23:13:21 +0000
commitf2435dcf2dc35a33fe7f52d9a4363ed957754e69 (patch)
tree626182a7434cccb3f5ab4d64816737e09b96a053 /Master/texmf-dist/doc/latex/oberdiek/test
parentde46b5f77bf1be619bbc385a2708563c6b760b64 (diff)
oberdiek update (22sep09)
git-svn-id: svn://tug.org/texlive/trunk@15428 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test')
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test1.tex110
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test2.tex102
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test3.tex113
3 files changed, 325 insertions, 0 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test1.tex b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test1.tex
new file mode 100644
index 00000000000..bb0c2bd914b
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test1.tex
@@ -0,0 +1,110 @@
+%%
+%% This is file `uniquecounter-test1.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uniquecounter.dtx (with options: `test1')
+%%
+%% This is a generated file.
+%%
+%% Copyright (C) 2009 by Heiko Oberdiek <oberdiek@uni-freiburg.de>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either
+%% version 1.3 of this license or (at your option) any later
+%% version. 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.
+%%
+%% 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.
+%%
+\catcode`\{=1 %
+\catcode`\}=2 %
+\catcode`\#=6 %
+\catcode`\@=11 %
+\expandafter\ifx\csname count@\endcsname\relax
+ \countdef\count@=255 %
+\fi
+\expandafter\ifx\csname @gobble\endcsname\relax
+ \long\def\@gobble#1{}%
+\fi
+\expandafter\ifx\csname @firstofone\endcsname\relax
+ \long\def\@firstofone#1{#1}%
+\fi
+\expandafter\ifx\csname loop\endcsname\relax
+ \expandafter\@firstofone
+\else
+ \expandafter\@gobble
+\fi
+{%
+ \def\loop#1\repeat{%
+ \def\body{#1}%
+ \iterate
+ }%
+ \def\iterate{%
+ \body
+ \let\next\iterate
+ \else
+ \let\next\relax
+ \fi
+ \next
+ }%
+ \let\repeat=\fi
+}%
+\def\RestoreCatcodes{}
+\count@=0 %
+\loop
+ \edef\RestoreCatcodes{%
+ \RestoreCatcodes
+ \catcode\the\count@=\the\catcode\count@\relax
+ }%
+\ifnum\count@<255 %
+ \advance\count@ 1 %
+\repeat
+
+\def\RangeCatcodeInvalid#1#2{%
+ \count@=#1\relax
+ \loop
+ \catcode\count@=15 %
+ \ifnum\count@<#2\relax
+ \advance\count@ 1 %
+ \repeat
+}
+\expandafter\ifx\csname LoadCommand\endcsname\relax
+ \def\LoadCommand{\input uniquecounter.sty\relax}%
+\fi
+\def\Test{%
+ \RangeCatcodeInvalid{0}{47}%
+ \RangeCatcodeInvalid{58}{64}%
+ \RangeCatcodeInvalid{91}{96}%
+ \RangeCatcodeInvalid{123}{255}%
+ \catcode`\@=12 %
+ \catcode`\\=0 %
+ \catcode`\{=1 %
+ \catcode`\}=2 %
+ \catcode`\#=6 %
+ \catcode`\[=12 %
+ \catcode`\]=12 %
+ \catcode`\%=14 %
+ \catcode`\ =10 %
+ \catcode13=5 %
+ \LoadCommand
+ \RestoreCatcodes
+}
+\Test
+\csname @@end\endcsname
+\end
+\endinput
+%%
+%% End of file `uniquecounter-test1.tex'.
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test2.tex b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test2.tex
new file mode 100644
index 00000000000..a2723e2de28
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test2.tex
@@ -0,0 +1,102 @@
+%%
+%% This is file `uniquecounter-test2.tex',
+%% generated with the docstrip utility.
+%%
+%% The original source files were:
+%%
+%% uniquecounter.dtx (with options: `test2')
+%%
+%% This is a generated file.
+%%
+%% Copyright (C) 2009 by Heiko Oberdiek <oberdiek@uni-freiburg.de>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either
+%% version 1.3 of this license or (at your option) any later
+%% version. 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.
+%%
+%% 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.
+%%
+\NeedsTeXFormat{LaTeX2e}
+\nofiles
+\documentclass{minimal}
+\usepackage{uniquecounter}[2009/09/11]
+\usepackage{qstest}
+\IncludeTests{*}
+\LogTests{log}{*}{*}
+
+\newcommand*{\CheckValue}[2]{%
+ \Expect*{#2}*{\UniqueCounterGet{#1}}%
+}
+\newcommand*{\CheckSpace}[1]{%
+ \sbox0{#1}%
+ \Expect{0.0pt}*{\the\wd0}%
+}
+
+\begin{qstest}{creation}{creation}
+ \CheckSpace{%
+ \UniqueCounterNew{test}%
+ }%
+ \CheckValue{test}{0}%
+\end{qstest}
+
+\begin{qstest}{increment}{increment}
+ \CheckSpace{%
+ \UniqueCounterIncrement{test}%
+ }%
+ \CheckValue{test}{1}%
+ \makeatletter
+ \def\uqc@cnt@test{2147483645}%
+ \CheckValue{test}{2147483645}%
+ \CheckSpace{%
+ \UniqueCounterIncrement{test}%
+ }%
+ \CheckValue{test}{2147483646}%
+ \CheckSpace{%
+ \UniqueCounterIncrement{test}%
+ }%
+ \Expect{true}*{\ifx\uqc@inc\uqc@NumInc true\else false\fi}%
+ \CheckValue{test}{2147483647}%
+ \CheckSpace{%
+ \UniqueCounterIncrement{test}%
+ }%
+ \CheckValue{test}{2147483648}%
+ \CheckSpace{%
+ \UniqueCounterIncrement{test}%
+ }%
+ \CheckValue{test}{2147483649}%
+\end{qstest}
+
+\begin{qstest}{call}{call}
+ \def\CheckCall#1#2{%
+ \Expect{#1}{#2}%
+ }%
+ \CheckSpace{%
+ \UniqueCounterNew{foo}%
+ }%
+ \CheckValue{foo}{0}%
+ \CheckSpace{%
+ \UniqueCounterCall{foo}{\CheckCall}{1}%
+ }%
+ \CheckSpace{%
+ \UniqueCounterCall{foo}{\CheckCall}{2}%
+ }%
+ \CheckValue{foo}{2}%
+\end{qstest}
+
+\csname @@end\endcsname
+\endinput
+%%
+%% End of file `uniquecounter-test2.tex'.
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test3.tex b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test3.tex
new file mode 100644
index 00000000000..00cb530ec10
--- /dev/null
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/uniquecounter-test3.tex
@@ -0,0 +1,113 @@
+%%
+%% 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 <oberdiek@uni-freiburg.de>
+%%
+%% This work may be distributed and/or modified under the
+%% conditions of the LaTeX Project Public License, either
+%% version 1.3 of this license or (at your option) any later
+%% version. 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.
+%%
+%% 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'.