OSDN Git Service

\ltj@stop@overwrite@primitive (test)
[luatex-ja/luatexja.git] / test / test34-primitive.tex
1 \makeatletter
2 \def\ltj@stop@overwrite@primitive{\insert\vadjust}
3 \makeatother
4
5 \documentclass[landscape]{article}
6 \usepackage[margin=10mm,centering]{geometry}
7
8 \usepackage{luatexja}
9 \usepackage{breqn}
10
11 \begin{document}
12 \ttfamily\parindent0pt\footnotesize
13 \def\chk#1{%
14   \par\medskip\leavevmode
15   \hbox to 11em{\expandafter\string\csname #1\endcsname:\hss}\ 
16     \expandafter\meaning\csname #1\endcsname\\
17   \hbox to 11em{\expandafter\string\csname ltj@@#1\endcsname:\hss}\ 
18     \expandafter\meaning\csname ltj@@#1\endcsname\\
19   \hbox to 11em{\expandafter\string\csname ltj@@orig@#1\endcsname:\hss}\ 
20     \expandafter\meaning\csname ltj@@orig@#1\endcsname
21 }
22
23 a\vadjust{\hrule height 1pt width 30pt}bc\\d
24
25 \chk{/}
26 \chk{insert}
27 \chk{vadjust}
28 \chk{raise}
29 \chk{lower}
30 \chk{moveleft}
31 \chk{moveright}
32 \chk{vsplit}
33 \chk{vcenter}
34 \chk{unhbox}
35 \chk{unvbox}
36 \chk{unhcopy}
37 \chk{unvcopy}
38 \chk{lastbox}
39 \end{document}
40
41
42