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
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
|
use vars qw(%result_texis %result_texts %result_trees %result_errors
%result_indices %result_sectioning %result_nodes %result_menus
%result_floats %result_converted %result_converted_errors
%result_elements %result_directions_text);
use utf8;
$result_trees{'simple_imbricated_macro'} = {
'contents' => [
{
'args' => [
{
'parent' => {},
'text' => 'truc',
'type' => 'macro_name'
}
],
'cmdname' => 'macro',
'contents' => [
{
'parent' => {},
'text' => 'truc.
',
'type' => 'raw'
},
{
'cmdname' => 'macro',
'contents' => [
{
'parent' => {},
'text' => 'bidule.',
'type' => 'raw'
},
{
'parent' => {},
'text' => '
',
'type' => 'last_raw_newline'
}
],
'extra' => {
'arg_line' => ' bidule {}
'
},
'parent' => {}
},
{
'parent' => {},
'text' => '
',
'type' => 'empty_line_after_command'
}
],
'extra' => {
'arg_line' => ' truc {}
'
},
'line_nr' => {
'file_name' => '',
'line_nr' => 1,
'macro' => ''
},
'parent' => {}
},
{
'parent' => {},
'text' => '
',
'type' => 'empty_line_after_command'
},
{
'parent' => {},
'text' => '
',
'type' => 'empty_line'
},
{
'contents' => [
{
'parent' => {},
'text' => 'truc.
'
},
{
'args' => [
{
'parent' => {},
'text' => 'bidule',
'type' => 'macro_name'
}
],
'cmdname' => 'macro',
'contents' => [
{
'parent' => {},
'text' => 'bidule.',
'type' => 'raw'
},
{
'parent' => {},
'text' => '
',
'type' => 'last_raw_newline'
}
],
'extra' => {
'arg_line' => ' bidule {}
'
},
'line_nr' => {
'file_name' => '',
'line_nr' => 8,
'macro' => 'truc'
},
'parent' => {}
},
{
'parent' => {},
'text' => '
',
'type' => 'empty_line_after_command'
}
],
'parent' => {},
'type' => 'paragraph'
},
{
'parent' => {},
'text' => '
',
'type' => 'empty_line'
},
{
'contents' => [
{
'parent' => {},
'text' => 'bidule.
'
}
],
'parent' => {},
'type' => 'paragraph'
}
],
'type' => 'text_root'
};
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[1];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[1];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'contents'}[2]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[0];
$result_trees{'simple_imbricated_macro'}{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_trees{'simple_imbricated_macro'}{'contents'}[1]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_trees{'simple_imbricated_macro'}{'contents'}[2]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[1]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'contents'}[2]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[3];
$result_trees{'simple_imbricated_macro'}{'contents'}[3]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_trees{'simple_imbricated_macro'}{'contents'}[4]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_trees{'simple_imbricated_macro'}{'contents'}[5]{'contents'}[0]{'parent'} = $result_trees{'simple_imbricated_macro'}{'contents'}[5];
$result_trees{'simple_imbricated_macro'}{'contents'}[5]{'parent'} = $result_trees{'simple_imbricated_macro'};
$result_texis{'simple_imbricated_macro'} = '@macro truc {}
truc.
@macro bidule {}
bidule.
@end macro
@end macro
truc.
@macro bidule {}
bidule.
@end macro
bidule.
';
$result_texts{'simple_imbricated_macro'} = '
truc.
bidule.
';
$result_errors{'simple_imbricated_macro'} = [];
1;
|