summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2007-11-16 11:24:40 +0000
committerNorbert Preining <preining@logic.at>2007-11-16 11:24:40 +0000
commit55ae6e504d04d806c4c5ac253dedb98196fc1c35 (patch)
tree5200a08eba158000f26a357a2a54a0923dd189de /Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex
parenta7dfc63af349a5ea5fb37b110f584cc878308ea7 (diff)
oberdiek update 11/11
git-svn-id: svn://tug.org/texlive/trunk@5458 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex')
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex36
1 files changed, 34 insertions, 2 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex b/Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex
index 6812abb9a5c..8e321f0e4f2 100644
--- a/Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/etexcmds-test1.tex
@@ -28,7 +28,39 @@
%% etexcmds-test1.tex, etexcmds-test2.tex, etexcmds-test3.tex,
%% etexcmds-test4.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
@@ -37,7 +69,7 @@
\catcode\the\count@=\the\catcode\count@\relax
}%
\ifnum\count@<255 %
- \advance\count@\@ne
+ \advance\count@ 1 %
\repeat
\def\RangeCatcodeInvalid#1#2{%
@@ -45,7 +77,7 @@
\loop
\catcode\count@=15 %
\ifnum\count@<#2\relax
- \advance\count@\@ne
+ \advance\count@ 1 %
\repeat
}
\def\Test{%