1 files changed, 28 insertions, 7 deletions
diff --git a/Master/texmf-dist/doc/latex/oberdiek/test/soulutf8-test1.tex b/Master/texmf-dist/doc/latex/oberdiek/test/soulutf8-test1.tex
index a9d595b08bd..73dde7c87b9 100644
--- a/Master/texmf-dist/doc/latex/oberdiek/test/soulutf8-test1.tex
+++ b/Master/texmf-dist/doc/latex/oberdiek/test/soulutf8-test1.tex
@@ -86,6 +86,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 soulutf8.sty\relax}%
 \fi
@@ -96,15 +112,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