%% %% This is file `test-cctb-latex.tex', %% generated with the docstrip utility. %% %% The original source files were: %% %% luatexbase-cctb.dtx (with options: `testlatex') %% %% See the aforementioned source file(s) for copyright and licensing information. %% \catcode00 15 \RequirePackage{luatexbase-cctb} \begingroup \catcode64 11 \global\let\lua\luatexbase@directlua \endgroup \newluatexcatcodetable\testcctb \lua{assert(luatexbase.catcodetables.testcctb)} \begingroup \escapechar64 \newluatexcatcodetable\anothercctb \endgroup \lua{assert(luatexbase.catcodetables.anothercctb)} \def\test#1#2#3{% \begingroup \ifcsname CatcodeTable#1\endcsname \else \INTERR \fi \luatexcatcodetable\csname CatcodeTable#1\endcsname \ifnum\catcode#2=#3 \else \ERROR \fi \endgroup} \test {IniTeX} {00} {09} \test {IniTeX} {92} {00} \test {IniTeX} {64} {12} \test {IniTeX} {65} {11} \test {String} {92} {12} \test {String} {65} {12} \test {String} {32} {10} \test {Other} {92} {12} \test {Other} {65} {12} \test {Other} {32} {12} \test {LaTeXAtLetter} {64} {11} \test {LaTeX} {64} {12} \test {Expl} {32} {09} \documentclass{minimal} \lua{% tex.sprint('\string\\setbox0=\string\\hbox{') tex.sprint(luatexbase.catcodetables.string, "\string\\undef # _^&") tex.sprint('}') } \stop \endinput %% %% End of file `test-cctb-latex.tex'.