blob: bc51cf58e323626f35c99d428c6e9ee383ce3113 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
|
%%
%% This is file `test-regs-plain.tex',
%% generated with the docstrip utility.
%%
%% The original source files were:
%%
%% luatexbase-regs.dtx (with options: `testplain')
%%
%% See the aforementioned source file(s) for copyright and licensing information.
%%
\input luatexbase-regs.sty
\def\checkregister#1{%
\edef\newregister{\expandafter\noexpand\csname new#1\endcsname}%
\edef\locregister{\expandafter\noexpand\csname loc#1\endcsname}%
\count0 1
\loop
\newregister\dummy
\locregister\dummy
\ifnum\count0<30000
\advance\count0 1
\repeat}
\checkregister{count}
\checkregister{dimen}
\checkregister{skip}
\checkregister{muskip}
\checkregister{box}
\checkregister{toks}
\checkregister{marks}
\count0 1
\loop \ifnum\count0<100
\csname newinsert\endcsname\dummy
\advance\count0 1
\repeat
\globcountblk \dummy{3000}
\globdimenblk \dummy{3000}
\globskipblk \dummy{3000}
\globmuskipblk\dummy{3000}
\globboxblk \dummy{3000}
\globtoksblk \dummy{3000}
\globmarksblk \dummy{3000}
\loccountblk \dummy{1000}
\locdimenblk \dummy{1000}
\locskipblk \dummy{1000}
\locmuskipblk \dummy{1000}
\locboxblk \dummy{1000}
\loctoksblk \dummy{1000}
\locmarksblk \dummy{1000}
\bye
\endinput
%%
%% End of file `test-regs-plain.tex'.
|
