summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex')
-rw-r--r--Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex38
1 files changed, 28 insertions, 10 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex b/Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex
index 3315ca4b3ff..0d05adafe6a 100644
--- a/Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/pagegrid-test1.tex
@@ -25,9 +25,6 @@
%%
%% 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 pagegrid.dtx
%% and the derived files
%% pagegrid.sty, pagegrid.pdf, pagegrid.ins, pagegrid.drv,
@@ -85,6 +82,22 @@
\advance\count@ 1 %
\repeat
}
+\def\RangeCatcodeCheck#1#2#3{%
+ \count@=#1\relax
+ \loop
+ \ifnum#3=\catcode\count@
+ \else
+ \errmessage{%
+ Character \the\count@\space
+ with wrong catcode \the\catcode\count@\space
+ instead of \number#3%
+ }%
+ \fi
+ \ifnum\count@<#2\relax
+ \advance\count@ 1 %
+ \repeat
+}
+\def\space{ }
\expandafter\ifx\csname LoadCommand\endcsname\relax
\def\LoadCommand{\input pagegrid.sty\relax}%
\fi
@@ -95,15 +108,20 @@
\RangeCatcodeInvalid{123}{255}%
\catcode`\@=12 %
\catcode`\\=0 %
- \catcode`\{=1 %
- \catcode`\}=2 %
- \catcode`\#=6 %
- \catcode`\[=12 %
- \catcode`\]=12 %
\catcode`\%=14 %
- \catcode`\ =10 %
- \catcode13=5 %
\LoadCommand
+ \RangeCatcodeCheck{0}{36}{15}%
+ \RangeCatcodeCheck{37}{37}{14}%
+ \RangeCatcodeCheck{38}{47}{15}%
+ \RangeCatcodeCheck{48}{57}{12}%
+ \RangeCatcodeCheck{58}{63}{15}%
+ \RangeCatcodeCheck{64}{64}{12}%
+ \RangeCatcodeCheck{65}{90}{11}%
+ \RangeCatcodeCheck{91}{91}{15}%
+ \RangeCatcodeCheck{92}{92}{0}%
+ \RangeCatcodeCheck{93}{96}{15}%
+ \RangeCatcodeCheck{97}{122}{11}%
+ \RangeCatcodeCheck{123}{255}{15}%
\RestoreCatcodes
}
\Test