OSDN Git Service

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