[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp TODO Texinfo/Parser.pm t/02coverage....
|
From: |
Patrice Dumas |
|
Subject: |
texinfo/tp TODO Texinfo/Parser.pm t/02coverage.... |
|
Date: |
Thu, 12 Apr 2012 23:05:27 +0000 |
CVSROOT: /sources/texinfo
Module name: texinfo
Changes by: Patrice Dumas <pertusus> 12/04/12 23:05:27
Modified files:
tp : TODO
tp/Texinfo : Parser.pm
tp/t : 02coverage.t 16raw.t 181quotation.t
tp/t/results/invalid_nestings: section_on_def_line.pl
Added files:
tp/t/results/coverage: group_beginning_and_end_on_line.pl
tp/t/results/quotation: quotation_beginning_and_end_on_line.pl
tp/t/results/raw: beginning_and_end_on_line.pl
Log message:
Close block_line_arg correctly.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/TODO?cvsroot=texinfo&r1=1.276&r2=1.277
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/Texinfo/Parser.pm?cvsroot=texinfo&r1=1.371&r2=1.372
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/02coverage.t?cvsroot=texinfo&r1=1.66&r2=1.67
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/16raw.t?cvsroot=texinfo&r1=1.22&r2=1.23
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/181quotation.t?cvsroot=texinfo&r1=1.5&r2=1.6
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/group_beginning_and_end_on_line.pl?cvsroot=texinfo&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/invalid_nestings/section_on_def_line.pl?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/quotation/quotation_beginning_and_end_on_line.pl?cvsroot=texinfo&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/raw/beginning_and_end_on_line.pl?cvsroot=texinfo&rev=1.1
Patches:
Index: TODO
===================================================================
RCS file: /sources/texinfo/texinfo/tp/TODO,v
retrieving revision 1.276
retrieving revision 1.277
diff -u -b -r1.276 -r1.277
--- TODO 25 Mar 2012 23:57:39 -0000 1.276
+++ TODO 12 Apr 2012 23:05:25 -0000 1.277
@@ -7,6 +7,9 @@
Document TEXTCONTENT_COMMENT.
+Better BUG: messages, with context (line nr) more debugging informations
+and a better message.
+
Bugs
====
Index: Texinfo/Parser.pm
===================================================================
RCS file: /sources/texinfo/texinfo/tp/Texinfo/Parser.pm,v
retrieving revision 1.371
retrieving revision 1.372
diff -u -b -r1.371 -r1.372
--- Texinfo/Parser.pm 12 Apr 2012 17:30:12 -0000 1.371
+++ Texinfo/Parser.pm 12 Apr 2012 23:05:25 -0000 1.372
@@ -1581,22 +1581,10 @@
or $menu_commands{$current->{'cmdname'}});
pop @{$self->{'regions_stack'}}
if ($region_commands{$current->{'cmdname'}});
- #if ($current->{'args'}
- # and $current->{'args'}->[0] and $current->{'args'}->[0]->{'type'}
- # and $current->{'args'}->[0]->{'type'} eq 'block_line_arg') {
- # print STDERR "LLLL $current->{'cmdname'}\n";
- #}
$current = $current->{'parent'};
} else {
# There @item and @tab commands are closed, and also line commands
# with invalid content
- if ($current->{'cmdname'} and $current->{'args'}
- and $current->{'args'}->[0] and $current->{'args'}->[0]->{'type'}
- and $current->{'args'}->[0]->{'type'} eq 'misc_line_arg') {
- my $context = pop @{$self->{'context_stack'}};
- die "BUG: _close_current, command with misc_line_arg, context:
$context\n"
- if ($context ne 'line' and $context ne 'def');
- }
$current = $current->{'parent'};
}
} elsif ($current->{'type'}) {
@@ -1604,12 +1592,8 @@
if ($current->{'type'} eq 'bracketed') {
$self->_command_error($current, $line_nr,
$self->__("Misplaced %c"), ord('{'));
- $current = $current->{'parent'};
- } else {
- if ($current->{'type'} eq 'menu_comment'
+ } elsif ($current->{'type'} eq 'menu_comment'
or $current->{'type'} eq 'menu_entry_description') {
- print STDERR "Closing MENU COMMENT/ENTRY_DESCRIPTION
($current->{'type'}) when closing\n"
- if ($self->{'DEBUG'});
my $context = pop @{$self->{'context_stack'}};
warn "BUG: not preformatted on context stack $context (close
$current->{'type'})"
if ($context ne 'preformatted');
@@ -1617,9 +1601,13 @@
if (address@hidden>{'contents'}}) {
pop @{$current->{'parent'}->{'contents'}};
}
+ } elsif ($current->{'type'} eq 'misc_line_arg'
+ or $current->{'type'} eq 'block_line_arg') {
+ my $context = pop @{$self->{'context_stack'}};
+ die "BUG: _close_current, command with misc_line_arg, context:
$context\n"
+ if ($context ne 'line' and $context ne 'def');
}
$current = $current->{'parent'};
- }
} else { # Should never go here.
$current = $current->{'parent'} if ($current->{'parent'});
print STDERR "BUG: Where am I? "._print_current($current);
@@ -3271,7 +3259,7 @@
print STDERR "$indent"._print_current($current);
}
#cluck "Problem with opened line command $self->{'context_stack'}->[-1]";
- die "BUG: did not go up (infinite loop). Context_stack:
(@{$self->{'context_stack'}})\n"
+ die "BUG: did not go up (infinite loop). Context_stack:
(@{$self->{'context_stack'}})\n";
}
$current = $self->_end_line($current, $line_nr);
@@ -3649,7 +3637,7 @@
# end of the file or of a text fragment.
$current = _end_line ($self, $current, $line_nr);
# It may happen that there is an @include file on the line, it
- # will be picked up at NEXT_LINE
+ # will be picked up at NEXT_LINE, beginning a new line
next NEXT_LINE;
}
}
@@ -4110,7 +4098,6 @@
{ 'type' => 'misc_arg', 'text' => $arg,
'parent' => $current->{'contents'}->[-1] };
}
- $current = _end_line ($self, $current, $line_nr);
if ($command eq 'raisesections') {
$self->{'sections_level'}++;
} elsif ($command eq 'lowersections') {
@@ -4121,6 +4108,7 @@
$self->_register_and_warn_invalid($command, $invalid_parent,
$line_nr, $misc);
$self->_register_global_command($command, $misc, $line_nr);
+ $current = _end_line ($self, $current, $line_nr);
last NEXT_LINE if ($command eq 'bye');
last;
Index: t/02coverage.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/02coverage.t,v
retrieving revision 1.66
retrieving revision 1.67
diff -u -b -r1.66 -r1.67
--- t/02coverage.t 18 Jan 2012 22:31:13 -0000 1.66
+++ t/02coverage.t 12 Apr 2012 23:05:25 -0000 1.67
@@ -739,6 +739,9 @@
'],
['delcomment', undef, {'test_file' => 'delcomment.texi'}
],
+['group_beginning_and_end_on_line',
+'@group within @end group
+'],
);
foreach my $test (@test_cases) {
Index: t/16raw.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/16raw.t,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -b -r1.22 -r1.23
--- t/16raw.t 10 Jan 2012 00:25:22 -0000 1.22
+++ t/16raw.t 12 Apr 2012 23:05:26 -0000 1.23
@@ -349,6 +349,10 @@
['inline_missing_first_arg',
'@inlinefmt{ , aaa}. @inlineraw{, bbb}.
'],
+['beginning_and_end_on_line',
+'
address@hidden in tex @end tex
+'],
);
my %html_tests = (
Index: t/181quotation.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/181quotation.t,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- t/181quotation.t 11 Jan 2012 00:29:58 -0000 1.5
+++ t/181quotation.t 12 Apr 2012 23:05:26 -0000 1.6
@@ -72,6 +72,9 @@
In quotation
@end quotation
'],
+['quotation_beginning_and_end_on_line',
+'@quotation in quotation @end quotation
+'],
);
our ($arg_test_case, $arg_generate, $arg_debug);
Index: t/results/invalid_nestings/section_on_def_line.pl
===================================================================
RCS file:
/sources/texinfo/texinfo/tp/t/results/invalid_nestings/section_on_def_line.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- t/results/invalid_nestings/section_on_def_line.pl 28 Jan 2012 14:05:16
-0000 1.2
+++ t/results/invalid_nestings/section_on_def_line.pl 12 Apr 2012 23:05:26
-0000 1.3
@@ -81,18 +81,7 @@
}
],
'cmdname' => 'section',
- 'contents' => [],
- 'extra' => {
- 'invalid_nesting' => 1,
- 'misc_content' => [
- {}
- ]
- },
- 'level' => 2,
- 'line_nr' => {},
- 'number' => 1,
- 'parent' => {}
- },
+ 'contents' => [
{
'parent' => {},
'text' => '
@@ -117,6 +106,18 @@
'type' => 'empty_line'
}
],
+ 'extra' => {
+ 'invalid_nesting' => 1,
+ 'misc_content' => [
+ {}
+ ]
+ },
+ 'level' => 2,
+ 'line_nr' => {},
+ 'number' => 1,
+ 'parent' => {}
+ }
+ ],
'type' => 'document_root'
};
$result_trees{'section_on_def_line'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'section_on_def_line'}{'contents'}[0]{'contents'}[0];
@@ -132,13 +133,13 @@
$result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0]{'contents'}[1]{'parent'}
= $result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0];
$result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0]{'contents'}[2]{'parent'}
= $result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0];
$result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0]{'parent'} =
$result_trees{'section_on_def_line'}{'contents'}[1];
+$result_trees{'section_on_def_line'}{'contents'}[1]{'contents'}[0]{'parent'} =
$result_trees{'section_on_def_line'}{'contents'}[1];
+$result_trees{'section_on_def_line'}{'contents'}[1]{'contents'}[1]{'contents'}[0]{'parent'}
= $result_trees{'section_on_def_line'}{'contents'}[1]{'contents'}[1];
+$result_trees{'section_on_def_line'}{'contents'}[1]{'contents'}[1]{'parent'} =
$result_trees{'section_on_def_line'}{'contents'}[1];
+$result_trees{'section_on_def_line'}{'contents'}[1]{'contents'}[2]{'parent'} =
$result_trees{'section_on_def_line'}{'contents'}[1];
$result_trees{'section_on_def_line'}{'contents'}[1]{'extra'}{'misc_content'}[0]
= $result_trees{'section_on_def_line'}{'contents'}[1]{'args'}[0]{'contents'}[1];
$result_trees{'section_on_def_line'}{'contents'}[1]{'line_nr'} =
$result_trees{'section_on_def_line'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'line_nr'};
$result_trees{'section_on_def_line'}{'contents'}[1]{'parent'} =
$result_trees{'section_on_def_line'};
-$result_trees{'section_on_def_line'}{'contents'}[2]{'parent'} =
$result_trees{'section_on_def_line'};
-$result_trees{'section_on_def_line'}{'contents'}[3]{'contents'}[0]{'parent'} =
$result_trees{'section_on_def_line'}{'contents'}[3];
-$result_trees{'section_on_def_line'}{'contents'}[3]{'parent'} =
$result_trees{'section_on_def_line'};
-$result_trees{'section_on_def_line'}{'contents'}[4]{'parent'} =
$result_trees{'section_on_def_line'};
$result_texis{'section_on_def_line'} = '@deffn a b @section s
Index: t/results/coverage/group_beginning_and_end_on_line.pl
===================================================================
RCS file: t/results/coverage/group_beginning_and_end_on_line.pl
diff -N t/results/coverage/group_beginning_and_end_on_line.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ t/results/coverage/group_beginning_and_end_on_line.pl 12 Apr 2012
23:05:26 -0000 1.1
@@ -0,0 +1,117 @@
+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{'group_beginning_and_end_on_line'} = {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'within '
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'block_line_arg'
+ }
+ ],
+ 'cmdname' => 'group',
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'group'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'spaces_at_end'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'misc_line_arg'
+ }
+ ],
+ 'cmdname' => 'end',
+ 'extra' => {
+ 'command' => {},
+ 'command_argument' => 'group',
+ 'text_arg' => 'group'
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'extra' => {
+ 'end_command' => {}
+ },
+ 'line_nr' => {},
+ 'parent' => {}
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'parent'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'parent'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'parent'}
= $result_trees{'group_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'extra'}{'end_command'}
=
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'line_nr'} =
$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'line_nr'};
+$result_trees{'group_beginning_and_end_on_line'}{'contents'}[0]{'parent'} =
$result_trees{'group_beginning_and_end_on_line'};
+
+$result_texis{'group_beginning_and_end_on_line'} = '@group within @end group
+';
+
+
+$result_texts{'group_beginning_and_end_on_line'} = '';
+
+$result_errors{'group_beginning_and_end_on_line'} = [
+ {
+ 'error_line' => ':1: warning: @end should only appear at a line beginning
+',
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => '',
+ 'text' => '@end should only appear at a line beginning',
+ 'type' => 'warning'
+ }
+];
+
+
+1;
Index: t/results/quotation/quotation_beginning_and_end_on_line.pl
===================================================================
RCS file: t/results/quotation/quotation_beginning_and_end_on_line.pl
diff -N t/results/quotation/quotation_beginning_and_end_on_line.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ t/results/quotation/quotation_beginning_and_end_on_line.pl 12 Apr 2012
23:05:26 -0000 1.1
@@ -0,0 +1,143 @@
+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{'quotation_beginning_and_end_on_line'} = {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'in quotation '
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'block_line_arg'
+ }
+ ],
+ 'cmdname' => 'quotation',
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'quotation'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'spaces_at_end'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'misc_line_arg'
+ }
+ ],
+ 'cmdname' => 'end',
+ 'extra' => {
+ 'command' => {},
+ 'command_argument' => 'quotation',
+ 'invalid_nesting' => 1,
+ 'text_arg' => 'quotation'
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'extra' => {
+ 'end_command' => {}
+ },
+ 'line_nr' => {},
+ 'parent' => {}
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'args'}[0]{'parent'}
= $result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'args'}[0]{'parent'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'parent'}
= $result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'extra'}{'end_command'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0];
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'line_nr'}
=
$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'contents'}[0]{'line_nr'};
+$result_trees{'quotation_beginning_and_end_on_line'}{'contents'}[0]{'parent'}
= $result_trees{'quotation_beginning_and_end_on_line'};
+
+$result_texis{'quotation_beginning_and_end_on_line'} = '@quotation in
quotation @end quotation
+';
+
+
+$result_texts{'quotation_beginning_and_end_on_line'} = 'in quotation
+';
+
+$result_errors{'quotation_beginning_and_end_on_line'} = [
+ {
+ 'error_line' => ':1: warning: @end should only appear at a line beginning
+',
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => '',
+ 'text' => '@end should only appear at a line beginning',
+ 'type' => 'warning'
+ },
+ {
+ 'error_line' => ':1: warning: @end should not appear in @quotation
+',
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => '',
+ 'text' => '@end should not appear in @quotation',
+ 'type' => 'warning'
+ }
+];
+
+
+
+$result_converted{'plaintext'}->{'quotation_beginning_and_end_on_line'} = '';
+
+
+$result_converted{'html_text'}->{'quotation_beginning_and_end_on_line'} =
'<blockquote>
+</blockquote>
+';
+
+
+$result_converted{'xml'}->{'quotation_beginning_and_end_on_line'} =
'<quotation><quotationtype>in quotation </quotationtype></quotation>
+';
+
+
+$result_converted{'docbook'}->{'quotation_beginning_and_end_on_line'} =
'<blockquote></blockquote>';
+
+1;
Index: t/results/raw/beginning_and_end_on_line.pl
===================================================================
RCS file: t/results/raw/beginning_and_end_on_line.pl
diff -N t/results/raw/beginning_and_end_on_line.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ t/results/raw/beginning_and_end_on_line.pl 12 Apr 2012 23:05:26 -0000
1.1
@@ -0,0 +1,126 @@
+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{'beginning_and_end_on_line'} = {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'empty_line'
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'in tex '
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'block_line_arg'
+ }
+ ],
+ 'cmdname' => 'tex',
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => ' ',
+ 'type' => 'empty_spaces_after_command'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'tex'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'spaces_at_end'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'misc_line_arg'
+ }
+ ],
+ 'cmdname' => 'end',
+ 'extra' => {
+ 'command' => {},
+ 'command_argument' => 'tex',
+ 'text_arg' => 'tex'
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 2,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ }
+ ],
+ 'extra' => {
+ 'end_command' => {}
+ },
+ 'line_nr' => {},
+ 'parent' => {}
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'beginning_and_end_on_line'}{'contents'}[0]{'parent'} =
$result_trees{'beginning_and_end_on_line'};
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0]{'contents'}[1]{'parent'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'args'}[0]{'parent'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
=
$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'}
=
$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'}
=
$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'extra'}{'command'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'parent'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'extra'}{'end_command'}
= $result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0];
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'line_nr'} =
$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'contents'}[0]{'line_nr'};
+$result_trees{'beginning_and_end_on_line'}{'contents'}[1]{'parent'} =
$result_trees{'beginning_and_end_on_line'};
+
+$result_texis{'beginning_and_end_on_line'} = '
address@hidden in tex @end tex
+';
+
+
+$result_texts{'beginning_and_end_on_line'} = '
+';
+
+$result_errors{'beginning_and_end_on_line'} = [
+ {
+ 'error_line' => ':2: warning: @end should only appear at a line beginning
+',
+ 'file_name' => '',
+ 'line_nr' => 2,
+ 'macro' => '',
+ 'text' => '@end should only appear at a line beginning',
+ 'type' => 'warning'
+ }
+];
+
+
+1;
| [Prev in Thread] |
Current Thread |
[Next in Thread] |
- texinfo/tp TODO Texinfo/Parser.pm t/02coverage....,
Patrice Dumas <=