1use vars qw(%result_texis %result_texts %result_trees %result_errors 2 %result_indices %result_sectioning %result_nodes %result_menus 3 %result_floats %result_converted %result_converted_errors 4 %result_elements %result_directions_text); 5 6use utf8; 7 8$result_trees{'comment_on_set_line'} = { 9 'contents' => [ 10 { 11 'args' => [ 12 { 13 'parent' => {}, 14 'text' => 'x', 15 'type' => 'misc_arg' 16 }, 17 { 18 'parent' => {}, 19 'text' => '', 20 'type' => 'misc_arg' 21 } 22 ], 23 'cmdname' => 'set', 24 'extra' => { 25 'arg_line' => ' x@c 26', 27 'misc_args' => [ 28 'x', 29 '' 30 ] 31 }, 32 'parent' => {} 33 }, 34 { 35 'args' => [ 36 { 37 'parent' => {}, 38 'text' => 'y', 39 'type' => 'misc_arg' 40 }, 41 { 42 'parent' => {}, 43 'text' => '', 44 'type' => 'misc_arg' 45 } 46 ], 47 'cmdname' => 'set', 48 'extra' => { 49 'arg_line' => ' y @c 50', 51 'misc_args' => [ 52 'y', 53 '' 54 ] 55 }, 56 'parent' => {} 57 }, 58 { 59 'args' => [ 60 { 61 'parent' => {}, 62 'text' => 'z', 63 'type' => 'misc_arg' 64 }, 65 { 66 'parent' => {}, 67 'text' => 'g', 68 'type' => 'misc_arg' 69 } 70 ], 71 'cmdname' => 'set', 72 'extra' => { 73 'arg_line' => ' z g@c 74', 75 'misc_args' => [ 76 'z', 77 'g' 78 ] 79 }, 80 'parent' => {} 81 }, 82 { 83 'args' => [ 84 { 85 'parent' => {}, 86 'text' => 't', 87 'type' => 'misc_arg' 88 }, 89 { 90 'parent' => {}, 91 'text' => 'a vv', 92 'type' => 'misc_arg' 93 } 94 ], 95 'cmdname' => 'set', 96 'extra' => { 97 'arg_line' => ' t a vv @comment@ggg 98', 99 'misc_args' => [ 100 't', 101 'a vv' 102 ] 103 }, 104 'parent' => {} 105 }, 106 { 107 'parent' => {}, 108 'text' => ' 109', 110 'type' => 'empty_line' 111 }, 112 { 113 'contents' => [ 114 { 115 'parent' => {}, 116 'text' => '!!, !!, !g!, !a vv! 117' 118 } 119 ], 120 'parent' => {}, 121 'type' => 'paragraph' 122 } 123 ], 124 'type' => 'text_root' 125}; 126$result_trees{'comment_on_set_line'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[0]; 127$result_trees{'comment_on_set_line'}{'contents'}[0]{'args'}[1]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[0]; 128$result_trees{'comment_on_set_line'}{'contents'}[0]{'parent'} = $result_trees{'comment_on_set_line'}; 129$result_trees{'comment_on_set_line'}{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[1]; 130$result_trees{'comment_on_set_line'}{'contents'}[1]{'args'}[1]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[1]; 131$result_trees{'comment_on_set_line'}{'contents'}[1]{'parent'} = $result_trees{'comment_on_set_line'}; 132$result_trees{'comment_on_set_line'}{'contents'}[2]{'args'}[0]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[2]; 133$result_trees{'comment_on_set_line'}{'contents'}[2]{'args'}[1]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[2]; 134$result_trees{'comment_on_set_line'}{'contents'}[2]{'parent'} = $result_trees{'comment_on_set_line'}; 135$result_trees{'comment_on_set_line'}{'contents'}[3]{'args'}[0]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[3]; 136$result_trees{'comment_on_set_line'}{'contents'}[3]{'args'}[1]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[3]; 137$result_trees{'comment_on_set_line'}{'contents'}[3]{'parent'} = $result_trees{'comment_on_set_line'}; 138$result_trees{'comment_on_set_line'}{'contents'}[4]{'parent'} = $result_trees{'comment_on_set_line'}; 139$result_trees{'comment_on_set_line'}{'contents'}[5]{'contents'}[0]{'parent'} = $result_trees{'comment_on_set_line'}{'contents'}[5]; 140$result_trees{'comment_on_set_line'}{'contents'}[5]{'parent'} = $result_trees{'comment_on_set_line'}; 141 142$result_texis{'comment_on_set_line'} = '@set x@c 143@set y @c 144@set z g@c 145@set t a vv @comment@ggg 146 147!!, !!, !g!, !a vv! 148'; 149 150 151$result_texts{'comment_on_set_line'} = ' 152!!, !!, !g!, !a vv! 153'; 154 155$result_errors{'comment_on_set_line'} = []; 156 157 158$result_floats{'comment_on_set_line'} = {}; 159 160 1611; 162