Lines Matching refs:parent_node
142 local ($parent_node, $tag, $type) = @_;
145 $node{PARENT} = $parent_node;
174 local ($parent_node, $node) = @_;
175 push @{$parent_node->{CHILDREN}}, $node;
178 if (defined $parent_node->{$tname}) {
179 push @{$parent_node->{$tname}}, $node
181 $parent_node->{$tname} = [ $node ];
186 local ($parent_node, $tag) = @_;
187 local $node = new_node($parent_node, $tag, 'EMPTY');
188 add_node($parent_node, $node);
192 local ($parent_node, $tag) = @_;
196 $node = new_node($parent_node, $tag, 'COMMENT');
197 add_node($parent_node, $node);
200 $node = new_node($parent_node, $tag, 'NODE');
202 add_node($parent_node, $node);
208 local ($parent_node, $text) = @_;
209 local $node = new_node($parent_node, $text, 'TEXT');
210 add_node($parent_node, $node);