summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex')
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex36
1 files changed, 34 insertions, 2 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex b/Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex
index acedbc7d1bf..f4b9042515a 100644
--- a/Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/bigintcalc-test1.tex
@@ -28,7 +28,39 @@
%% bigintcalc-test1.tex, bigintcalc-test2.tex,
%% bigintcalc-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
@@ -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{%