1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283 |
- 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{'multiline'} = {
- 'contents' => [
- {
- 'contents' => [
- {
- 'args' => [
- {
- 'contents' => [
- {
- 'parent' => {},
- 'text' => '
- ',
- 'type' => 'raw'
- },
- {
- 'parent' => {},
- 'text' => 'qdsqsddqsdsq
- ',
- 'type' => 'raw'
- },
- {
- 'parent' => {},
- 'text' => '
- ',
- 'type' => 'raw'
- }
- ],
- 'parent' => {},
- 'type' => 'brace_command_arg'
- }
- ],
- 'cmdname' => 'verb',
- 'contents' => [],
- 'line_nr' => {
- 'file_name' => '',
- 'line_nr' => 1,
- 'macro' => ''
- },
- 'parent' => {},
- 'type' => '@'
- },
- {
- 'parent' => {},
- 'text' => 'after verb.'
- }
- ],
- 'parent' => {},
- 'type' => 'paragraph'
- }
- ],
- 'type' => 'text_root'
- };
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'} = $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'multiline'}{'contents'}[0]{'contents'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'multiline'}{'contents'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'multiline'}{'contents'}[0];
- $result_trees{'multiline'}{'contents'}[0]{'parent'} = $result_trees{'multiline'};
- $result_texis{'multiline'} = '@verb{@
- qdsqsddqsdsq
- @}after verb.';
- $result_texts{'multiline'} = '
- qdsqsddqsdsq
- after verb.';
- $result_errors{'multiline'} = [];
- 1;
|