[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp/t converters_tests.t results/convert...
|
From: |
Patrice Dumas |
|
Subject: |
texinfo/tp/t converters_tests.t results/convert... |
|
Date: |
Wed, 11 Jan 2012 00:10:11 +0000 |
CVSROOT: /sources/texinfo
Module name: texinfo
Changes by: Patrice Dumas <pertusus> 12/01/11 00:10:11
Modified files:
tp/t : converters_tests.t
Added files:
tp/t/results/converters_tests: image_extension.pl
image_with_spaces.pl
Log message:
More @image tests.
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/converters_tests.t?cvsroot=texinfo&r1=1.16&r2=1.17
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/converters_tests/image_extension.pl?cvsroot=texinfo&rev=1.1
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/converters_tests/image_with_spaces.pl?cvsroot=texinfo&rev=1.1
Patches:
Index: converters_tests.t
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/converters_tests.t,v
retrieving revision 1.16
retrieving revision 1.17
diff -u -b -r1.16 -r1.17
--- converters_tests.t 9 Jan 2012 23:43:18 -0000 1.16
+++ converters_tests.t 11 Jan 2012 00:10:10 -0000 1.17
@@ -389,7 +389,14 @@
@c does not work in the standalone perl module
@c @@verbatiminclude full parent path
@c @verbatiminclude tp/t/include_dir/inc_file.texi
-',{'include_directories' => ['.', '..', 't/include_dir']}]
+',{'include_directories' => ['.', '..', 't/include_dir']}],
+['image_with_spaces',
+'@image{f--ile,,,@ }.
address@hidden,,,@:}.
+'],
+['image_extension',
+'@image{f---ile,,,,gr--a}
+'],
);
# This should go to a file, not to code...
@@ -400,11 +407,18 @@
],
);
+my %info_tests = (
+ 'image_with_spaces' => 1,
+ 'image_extension' => 1,
+);
+
foreach my $test (@test_cases) {
push @{$test->[2]->{'test_formats'}}, 'plaintext';
push @{$test->[2]->{'test_formats'}}, 'html_text';
push @{$test->[2]->{'test_formats'}}, 'xml';
push @{$test->[2]->{'test_formats'}}, 'docbook';
+ push @{$test->[2]->{'test_formats'}}, 'info'
+ if ($info_tests{$test->[0]});
}
foreach my $test (@html_text_cases) {
Index: results/converters_tests/image_extension.pl
===================================================================
RCS file: results/converters_tests/image_extension.pl
diff -N results/converters_tests/image_extension.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ results/converters_tests/image_extension.pl 11 Jan 2012 00:10:11 -0000
1.1
@@ -0,0 +1,157 @@
+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{'image_extension'} = {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'f---ile'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'gr--a'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'image',
+ 'contents' => [],
+ 'extra' => {
+ 'brace_command_contents' => [
+ [
+ {}
+ ],
+ undef,
+ undef,
+ undef,
+ [
+ {}
+ ]
+ ]
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+'
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'image_extension'}{'contents'}[0]{'args'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[0]{'parent'} =
$result_trees{'image_extension'}{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[1]{'parent'} =
$result_trees{'image_extension'}{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[2]{'parent'} =
$result_trees{'image_extension'}{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[3]{'parent'} =
$result_trees{'image_extension'}{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[4]{'contents'}[0]{'parent'}
= $result_trees{'image_extension'}{'contents'}[0]{'args'}[4];
+$result_trees{'image_extension'}{'contents'}[0]{'args'}[4]{'parent'} =
$result_trees{'image_extension'}{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'extra'}{'brace_command_contents'}[0][0]
= $result_trees{'image_extension'}{'contents'}[0]{'args'}[0]{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'extra'}{'brace_command_contents'}[4][0]
= $result_trees{'image_extension'}{'contents'}[0]{'args'}[4]{'contents'}[0];
+$result_trees{'image_extension'}{'contents'}[0]{'parent'} =
$result_trees{'image_extension'};
+$result_trees{'image_extension'}{'contents'}[1]{'parent'} =
$result_trees{'image_extension'};
+
+$result_texis{'image_extension'} = '@image{f---ile,,,,gr--a}
+';
+
+
+$result_texts{'image_extension'} = 'f---ile
+';
+
+$result_errors{'image_extension'} = [];
+
+
+
+$result_converted{'plaintext'}->{'image_extension'} = '[f---ile]';
+
+
+$result_converted{'html_text'}->{'image_extension'} = '<img
src="f---ile.gr--a" alt="f---ile">
+';
+
+$result_converted_errors{'html_text'}->{'image_extension'} = [
+ {
+ 'file_name' => '',
+ 'error_line' => ':1: warning: @image file `f---ile\' (for HTML) not found,
using `f---ile.gr--a\'
+',
+ 'text' => '@image file `f---ile\' (for HTML) not found, using
`f---ile.gr--a\'',
+ 'type' => 'warning',
+ 'macro' => '',
+ 'line_nr' => 1
+ }
+];
+
+
+
+$result_converted{'xml'}->{'image_extension'} =
'<image><imagefile>f---ile</imagefile><imageextension>gr--a</imageextension></image>
+';
+
+
+$result_converted{'docbook'}->{'image_extension'} =
'<informalfigure><mediaobject><imageobject><imagedata fileref="f---ile.jpg"
format="JPG"></imagedata></imageobject></mediaobject></informalfigure>
+';
+
+
+$result_converted{'info'}->{'image_extension'} = 'This is , produced by tp
version from .
+
+[f---ile]
+
+Tag Table:
+
+End Tag Table
+';
+
+$result_converted_errors{'info'}->{'image_extension'} = [
+ {
+ 'error_line' => 'warning: Document without nodes.
+',
+ 'text' => 'Document without nodes.',
+ 'type' => 'warning'
+ },
+ {
+ 'file_name' => '',
+ 'error_line' => ':1: warning: Cannot find @image file `f---ile.txt\'
+',
+ 'text' => 'Cannot find @image file `f---ile.txt\'',
+ 'type' => 'warning',
+ 'macro' => '',
+ 'line_nr' => 1
+ }
+];
+
+
+1;
Index: results/converters_tests/image_with_spaces.pl
===================================================================
RCS file: results/converters_tests/image_with_spaces.pl
diff -N results/converters_tests/image_with_spaces.pl
--- /dev/null 1 Jan 1970 00:00:00 -0000
+++ results/converters_tests/image_with_spaces.pl 11 Jan 2012 00:10:11
-0000 1.1
@@ -0,0 +1,212 @@
+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{'image_with_spaces'} = {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'f--ile'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [
+ {
+ 'cmdname' => ' ',
+ 'parent' => {}
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'image',
+ 'contents' => [],
+ 'extra' => {
+ 'brace_command_contents' => [
+ [
+ {}
+ ],
+ undef,
+ undef,
+ [
+ {}
+ ]
+ ]
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => '.
+'
+ },
+ {
+ 'args' => [
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'f--ile'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ },
+ {
+ 'contents' => [
+ {
+ 'cmdname' => ':',
+ 'parent' => {}
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'brace_command_arg'
+ }
+ ],
+ 'cmdname' => 'image',
+ 'contents' => [],
+ 'extra' => {
+ 'brace_command_contents' => [
+ [
+ {}
+ ],
+ undef,
+ undef,
+ [
+ {}
+ ]
+ ]
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 2,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'parent' => {},
+ 'text' => '.
+'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'paragraph'
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[0]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[1]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[2]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[3]{'contents'}[0]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[3];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[3]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'extra'}{'brace_command_contents'}[0][0]
= $result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[0]{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'extra'}{'brace_command_contents'}[3][0]
= $result_trees{'image_with_spaces'}{'contents'}[0]{'args'}[3]{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[0]{'parent'} =
$result_trees{'image_with_spaces'};
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[0]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[0]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[1]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[2]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[3]{'contents'}[0]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[3];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[3]{'parent'}
= $result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'extra'}{'brace_command_contents'}[0][0]
=
$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[0]{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'extra'}{'brace_command_contents'}[3][0]
=
$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'args'}[3]{'contents'}[0];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[1]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'contents'}[2]{'parent'} =
$result_trees{'image_with_spaces'}{'contents'}[1];
+$result_trees{'image_with_spaces'}{'contents'}[1]{'parent'} =
$result_trees{'image_with_spaces'};
+
+$result_texis{'image_with_spaces'} = '@image{f--ile,,,@ }.
address@hidden,,,@:}.
+';
+
+
+$result_texts{'image_with_spaces'} = 'f--ile.
+f--ile.
+';
+
+$result_errors{'image_with_spaces'} = [];
+
+
+
+$result_converted{'plaintext'}->{'image_with_spaces'} = 'Image
description""\\.. [Image description""\\.].
+';
+
+
+$result_converted{'html_text'}->{'image_with_spaces'} = '<img src="f--ile.png"
alt=" "><p>.
+<img src="f--ile.png" alt="f--ile">.
+</p>';
+
+
+$result_converted{'xml'}->{'image_with_spaces'} =
'<image><imagefile>f--ile</imagefile><alttext><spacecmd
type="spc"/></alttext></image><para>.
+<image
where="inline"><imagefile>f--ile</imagefile><alttext>&noeos;</alttext></image>.
+</para>';
+
+
+$result_converted{'docbook'}->{'image_with_spaces'} =
'<informalfigure><mediaobject><imageobject><imagedata fileref="f--ile.png"
format="PNG"></imagedata></imageobject><textobject><literallayout>Image
description""\\.</literallayout></textobject></mediaobject></informalfigure><para>.
+<inlinemediaobject><imageobject><imagedata fileref="f--ile.png"
format="PNG"></imagedata></imageobject><textobject><literallayout>Image
description""\\.</literallayout></textobject></inlinemediaobject>.
+</para>';
+
+
+$result_converted{'info'}->{'image_with_spaces'} = 'This is , produced by tp
version from .
+
+ [image src="f--ile.png" alt=" " text="Image description\\"\\"\\\\." ]
+. [image src="f--ile.png" alt="" text="[Image description\\"\\"\\\\.]" ].
+
+
+Tag Table:
+
+End Tag Table
+';
+
+$result_converted_errors{'info'}->{'image_with_spaces'} = [
+ {
+ 'error_line' => 'warning: Document without nodes.
+',
+ 'text' => 'Document without nodes.',
+ 'type' => 'warning'
+ }
+];
+
+
+1;