%% %% This is file `test-mcb-plain.tex', %% generated with the docstrip utility. %% %% The original source files were: %% %% luatexbase-mcb.dtx (with options: `testplain') %% %% Copyright (C) 2009 by Elie Roux %% %% This work is under the CC0 license. %% See source file 'luatexbase-mcb.dtx' for details. %% \input luatexbase-mcb.sty \catcode 64 11 \def\msg{\immediate\write16} \msg{===== BEGIN =====} \luatexbase@directlua{dofile('test-mcb.lua')} \def\test#1#2{% \msg{^^J*********^^J* Testing #1 (type #2)^^J*********} \msg{* Add two functions} \luatexbase@directlua{add_#1()} \csname test_#1\endcsname \msg{* Remove one} \luatexbase@directlua{rm_one_#1()} \csname test_#1\endcsname \msg{* Remove the second} \luatexbase@directlua{rm_two_#1()} \csname test_#1\endcsname \msg{* Add two functions again} \luatexbase@directlua{add_#1()} \csname test_#1\endcsname \msg{* Remove all functions} \luatexbase@directlua{luatexbase.reset_callback("#1")} \csname test_#1\endcsname } \catcode`\_ 11 \def\test_hpack_filter{\setbox0=\hbox{bla}} \def\test_hyphenate{\showhyphens{hyphenation}} \def\test_find_write_file{\immediate\openout15 test-mcb-out.log} \def\test_process_input_buffer{\input test-mcb-aux.tex} \test{hpack_filter}{list} \test{hyphenate}{simple} \test{find_write_file}{first} \test{process_input_buffer}{data} \msg{===== END =====} \bye \endinput %% %% End of file `test-mcb-plain.tex'.