texinfo/tp/t test_utils.pl results/coverage/blo...

texinfo-commits
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
texinfo/tp/t test_utils.pl results/coverage/blo...

From:	Patrice Dumas
Subject:	texinfo/tp/t test_utils.pl results/coverage/blo...
Date:	Sat, 20 Nov 2010 17:05:41 +0000
CVSROOT:        /sources/texinfo
Module name:    texinfo
Changes by:     Patrice Dumas <pertusus>        10/11/20 17:05:41

Modified files:
        tp/t           : test_utils.pl 
        tp/t/results/coverage: block_commands.pl commands.pl def.pl 
                               item_container.pl 
                               lettered_accent_and_spaces.pl math.pl 
                               multitable.pl nested_block_commands.pl 
                               preformatted.pl table.pl 
                               table_command_comment.pl 

Log message:
        Add results of plaintext formatting to teh test suite.
        Those results are not always correct, though.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/test_utils.pl?cvsroot=texinfo&r1=1.53&r2=1.54
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/block_commands.pl?cvsroot=texinfo&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/commands.pl?cvsroot=texinfo&r1=1.24&r2=1.25
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/def.pl?cvsroot=texinfo&r1=1.23&r2=1.24
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/item_container.pl?cvsroot=texinfo&r1=1.19&r2=1.20
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/lettered_accent_and_spaces.pl?cvsroot=texinfo&r1=1.2&r2=1.3
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/math.pl?cvsroot=texinfo&r1=1.13&r2=1.14
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/multitable.pl?cvsroot=texinfo&r1=1.22&r2=1.23
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/nested_block_commands.pl?cvsroot=texinfo&r1=1.12&r2=1.13
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/preformatted.pl?cvsroot=texinfo&r1=1.21&r2=1.22
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/table.pl?cvsroot=texinfo&r1=1.21&r2=1.22
http://cvs.savannah.gnu.org/viewcvs/texinfo/tp/t/results/coverage/table_command_comment.pl?cvsroot=texinfo&r1=1.17&r2=1.18

Patches:
Index: test_utils.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/test_utils.pl,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -b -r1.53 -r1.54
--- test_utils.pl       20 Nov 2010 16:58:03 -0000      1.53
+++ test_utils.pl       20 Nov 2010 17:05:40 -0000      1.54
@@ -293,13 +293,13 @@
       local $Data::Dumper::Sortkeys = \&filter_floats_keys;
       $out_result .= Data::Dumper->Dump([$floats], 
['$result_floats{\''.$test_name.'\'}']) ."\n\n";
     }
-  #  foreach my $format (@tested_formats) {
-  #    if (defined($converted{$format})) {
-  #      $out_result .= "\n".'$result_converted{\''.$format.'\'}->{\''
-  #        .$test_name.'\'} = 
\''.protect_perl_string($converted{$format})."';\n\n";
-  #    #print STDERR "$format: \n$converted{$format}";
-  #    }
-  #  }
+    foreach my $format (@tested_formats) {
+      if (defined($converted{$format})) {
+        $out_result .= "\n".'$result_converted{\''.$format.'\'}->{\''
+          .$test_name.'\'} = 
\''.protect_perl_string($converted{$format})."';\n\n";
+      #print STDERR "$format: \n$converted{$format}";
+      }
+    }
 
     $out_result .= "1;\n";
     print OUT $out_result;

Index: results/coverage/block_commands.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/block_commands.pl,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- results/coverage/block_commands.pl  20 Nov 2010 16:58:04 -0000      1.23
+++ results/coverage/block_commands.pl  20 Nov 2010 17:05:40 -0000      1.24
@@ -360,4 +360,15 @@
 
$result_floats{'block_commands'}{'a-float'}[0]{'extra'}{'caption'}{'extra'}{'float'}
 = $result_floats{'block_commands'}{'a-float'}[0];
 
 
+
+$result_converted{'plaintext'}->{'block_commands'} = '
+in group
+
+warning:
+in quotation
+
+In float
+
+';
+
 1;

Index: results/coverage/commands.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/commands.pl,v
retrieving revision 1.24
retrieving revision 1.25
diff -u -b -r1.24 -r1.25
--- results/coverage/commands.pl        20 Nov 2010 16:58:04 -0000      1.24
+++ results/coverage/commands.pl        20 Nov 2010 17:05:40 -0000      1.25
@@ -430,4 +430,10 @@
 $result_errors{'commands'} = [];
 
 
+
+$result_converted{'plaintext'}->{'commands'} = '@ TeX  e" i^ a~ a* File -> 
Open.  b <a>
+
+majorheading in b
+';
+
 1;

Index: results/coverage/def.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/def.pl,v
retrieving revision 1.23
retrieving revision 1.24
diff -u -b -r1.23 -r1.24
--- results/coverage/def.pl     20 Nov 2010 16:58:04 -0000      1.23
+++ results/coverage/def.pl     20 Nov 2010 17:05:40 -0000      1.24
@@ -1759,4 +1759,29 @@
 $result_errors{'def'} = [];
 
 
+
+$result_converted{'plaintext'}->{'def'} = '
+ -- c--ategory: d--effn_name a--rguments...
+d-effn
+
+ -- cate--gory: de--ffn_name ar--guments    more args 
+ even more so
+def-fn
+
+ -- fset: i a g
+ -- cmde: truc
+ -- Command: log trap
+ -- Command:  log trap1
+ -- Command: log trap2
+ -- cmde: id ule truc
+ -- cmde2: id `i\' ule truc
+ -- : machin
+ -- : bidule machin
+ -- truc: machin
+ -- truc: followed by a comment
+ -- truc: after a deff item
+ -- truc: deffnx before end deffn
+Various deff lines
+';
+
 1;

Index: results/coverage/item_container.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/item_container.pl,v
retrieving revision 1.19
retrieving revision 1.20
diff -u -b -r1.19 -r1.20
--- results/coverage/item_container.pl  20 Nov 2010 16:58:04 -0000      1.19
+++ results/coverage/item_container.pl  20 Nov 2010 17:05:41 -0000      1.20
@@ -213,4 +213,11 @@
 $result_errors{'item_container'} = [];
 
 
+
+$result_converted{'plaintext'}->{'item_container'} = '
+i-tem +
+
+b-ullet
+';
+
 1;

Index: results/coverage/lettered_accent_and_spaces.pl
===================================================================
RCS file: 
/sources/texinfo/texinfo/tp/t/results/coverage/lettered_accent_and_spaces.pl,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -b -r1.2 -r1.3
--- results/coverage/lettered_accent_and_spaces.pl      20 Nov 2010 16:58:04 
-0000      1.2
+++ results/coverage/lettered_accent_and_spaces.pl      20 Nov 2010 17:05:41 
-0000      1.3
@@ -47,4 +47,8 @@
 $result_errors{'lettered_accent_and_spaces'} = [];
 
 
+
+$result_converted{'plaintext'}->{'lettered_accent_and_spaces'} = 'a*
+';
+
 1;

Index: results/coverage/math.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/math.pl,v
retrieving revision 1.13
retrieving revision 1.14
diff -u -b -r1.13 -r1.14
--- results/coverage/math.pl    20 Nov 2010 16:58:04 -0000      1.13
+++ results/coverage/math.pl    20 Nov 2010 17:05:41 -0000      1.14
@@ -368,4 +368,15 @@
 ];
 
 
+
+$result_converted{'plaintext'}->{'math'} = 'Simple math {x^i}\\over{\\tan y}
+
+Math with @-command `math code\' a < b
+
+Complex \\underline{`math \\hbox{ code }\'} \\i \\sum_{i}{\\underline{f}}
+
address@hidden outside of math \\
+
+';
+
 1;

Index: results/coverage/multitable.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/multitable.pl,v
retrieving revision 1.22
retrieving revision 1.23
diff -u -b -r1.22 -r1.23
--- results/coverage/multitable.pl      20 Nov 2010 16:58:04 -0000      1.22
+++ results/coverage/multitable.pl      20 Nov 2010 17:05:41 -0000      1.23
@@ -556,4 +556,18 @@
 $result_errors{'multitable'} = [];
 
 
+
+$result_converted{'plaintext'}->{'multitable'} = '
+mu-ltitable headitem
+another tab
+mu-ltitable item
+multitable tab
+mu-ltitable item 2
+multitable tab 2
+lone mu-ltitable item
+
+truc
+bidule
+';
+
 1;

Index: results/coverage/nested_block_commands.pl
===================================================================
RCS file: 
/sources/texinfo/texinfo/tp/t/results/coverage/nested_block_commands.pl,v
retrieving revision 1.12
retrieving revision 1.13
diff -u -b -r1.12 -r1.13
--- results/coverage/nested_block_commands.pl   20 Nov 2010 16:58:04 -0000      
1.12
+++ results/coverage/nested_block_commands.pl   20 Nov 2010 17:05:41 -0000      
1.13
@@ -1090,4 +1090,44 @@
 $result_errors{'nested_block_commands'} = [];
 
 
+
+$result_converted{'plaintext'}->{'nested_block_commands'} = 'In group
+in quotation
+
+in quotation
+
+In group
+in quotation
+after quotation
+
+In group sp b
+in quotation
+
+In group sp b a
+
+in quotation
+
+In group sp a
+
+in quotation
+
+in quotation sp b
+
+in quotation sp b a
+
+in quotation sp a
+
+in quotation
+
+After quotation sp b
+
+in quotation
+After quotation sp a
+
+in quotation
+
+After quotation sp b a
+
+';
+
 1;

Index: results/coverage/preformatted.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/preformatted.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- results/coverage/preformatted.pl    20 Nov 2010 16:58:04 -0000      1.21
+++ results/coverage/preformatted.pl    20 Nov 2010 17:05:41 -0000      1.22
@@ -229,4 +229,12 @@
 $result_errors{'preformatted'} = [];
 
 
+
+$result_converted{'plaintext'}->{'preformatted'} = '
+     e-xample  some  
+   text
+item in table in format
+in table in format
+';
+
 1;

Index: results/coverage/table.pl
===================================================================
RCS file: /sources/texinfo/texinfo/tp/t/results/coverage/table.pl,v
retrieving revision 1.21
retrieving revision 1.22
diff -u -b -r1.21 -r1.22
--- results/coverage/table.pl   20 Nov 2010 16:58:04 -0000      1.21
+++ results/coverage/table.pl   20 Nov 2010 17:05:41 -0000      1.22
@@ -527,4 +527,14 @@
 $result_errors{'table'} = [];
 
 
+
+$result_converted{'plaintext'}->{'table'} = '
+table item
+table itemx
+In table
+
+vtable item
+itemx vtable
+';
+
 1;

Index: results/coverage/table_command_comment.pl
===================================================================
RCS file: 
/sources/texinfo/texinfo/tp/t/results/coverage/table_command_comment.pl,v
retrieving revision 1.17
retrieving revision 1.18
diff -u -b -r1.17 -r1.18
--- results/coverage/table_command_comment.pl   20 Nov 2010 16:58:04 -0000      
1.17
+++ results/coverage/table_command_comment.pl   20 Nov 2010 17:05:41 -0000      
1.18
@@ -119,4 +119,8 @@
 $result_errors{'table_command_comment'} = [];
 
 
+
+$result_converted{'plaintext'}->{'table_command_comment'} = 'item
+';
+
 1;
[Prev in Thread]
Current Thread
[Next in Thread]
texinfo/tp/t test_utils.pl results/coverage/blo..., Patrice Dumas, 2010/11/01
- texinfo/tp/t test_utils.pl results/coverage/blo..., Patrice Dumas <=
Prev by Date: texinfo/tp/Texinfo/Convert Plaintext.pm
Next by Date: texinfo/tp Texinfo/Convert/Plaintext.pm t/test_...
Previous by thread: texinfo/tp/t test_utils.pl results/coverage/blo...
Next by thread: texinfo/tp Texinfo/Parser.pm t/test_utils.pl t/...
Index(es):
- Date
- Thread