blob: 415aca8f4e8f2fd00855e1fc074076ba565d7089 (
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
55
|
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{'ifclear_in_ifset'} = {
'contents' => [
{
'parent' => {},
'text' => '
',
'type' => 'empty_line'
},
{
'args' => [
{
'parent' => {},
'text' => ' WRONG - missing @end ifset.
',
'type' => 'misc_arg'
}
],
'cmdname' => 'c',
'extra' => {
'misc_args' => [
' WRONG - missing @end ifset.
'
]
},
'parent' => {}
}
],
'type' => 'text_root'
};
$result_trees{'ifclear_in_ifset'}{'contents'}[0]{'parent'} = $result_trees{'ifclear_in_ifset'};
$result_trees{'ifclear_in_ifset'}{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'ifclear_in_ifset'}{'contents'}[1];
$result_trees{'ifclear_in_ifset'}{'contents'}[1]{'parent'} = $result_trees{'ifclear_in_ifset'};
$result_texis{'ifclear_in_ifset'} = '
@c WRONG - missing @end ifset.
';
$result_texts{'ifclear_in_ifset'} = '
';
$result_errors{'ifclear_in_ifset'} = [];
$result_floats{'ifclear_in_ifset'} = {};
1;
|