texinfo-commits
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

branch master updated: tp/DebugTexinfo/DebugTree.pm: show comment_at_end


From: Patrice Dumas
Subject: branch master updated: tp/DebugTexinfo/DebugTree.pm: show comment_at_end Tests of @float with empty label after a comma
Date: Wed, 31 Aug 2022 03:33:18 -0400

This is an automated email from the git hooks/post-receive script.

pertusus pushed a commit to branch master
in repository texinfo.

The following commit(s) were added to refs/heads/master by this push:
     new c8ae61c939 tp/DebugTexinfo/DebugTree.pm: show comment_at_end Tests of 
@float with empty label after a comma
c8ae61c939 is described below

commit c8ae61c939ff8d406f6898eae7ecd0a1a2ad2a71
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Wed Aug 31 09:30:30 2022 +0200

    tp/DebugTexinfo/DebugTree.pm: show comment_at_end
    Tests of @float with empty label after a comma
---
 tp/DebugTexinfo/DebugTree.pm                       |   6 +
 tp/t/27float.t                                     |  18 ++
 tp/t/results/float/empty_label_no_space.pl         | 201 +++++++++++++++++++++
 tp/t/results/float/empty_label_no_space_comment.pl | 199 ++++++++++++++++++++
 tp/t/results/float/empty_label_with_space.pl       | 201 +++++++++++++++++++++
 .../float/empty_label_with_space_comment.pl        | 200 ++++++++++++++++++++
 6 files changed, 825 insertions(+)

diff --git a/tp/DebugTexinfo/DebugTree.pm b/tp/DebugTexinfo/DebugTree.pm
index d923b3be6a..24a03c4f58 100644
--- a/tp/DebugTexinfo/DebugTree.pm
+++ b/tp/DebugTexinfo/DebugTree.pm
@@ -185,6 +185,12 @@ sub _print_tree($$;$$)
     .'a/'._protect_text($element->{'extra'}->{'spaces_after_argument'}).'/';
   }
   $result .= "\n";
+  if ($element->{'extra'}
+      and defined($element->{'extra'}->{'comment_at_end'})) {
+    $result .= ' ' x ($level + 1).'/comment_at_end/'."\n";
+    $result .= _print_tree ($self, $element->{'extra'}->{'comment_at_end'},
+                            $level +2);
+  }
   if ($element->{'args'}) {
     foreach my $arg (@{$element->{'args'}}) {
       $result .= _print_tree ($self, $arg, $level +1, 1);
diff --git a/tp/t/27float.t b/tp/t/27float.t
index 46a54c1765..b4a2963f39 100644
--- a/tp/t/27float.t
+++ b/tp/t/27float.t
@@ -18,6 +18,24 @@ my @test_cases = (
 In float.
 @caption{Caption.}
 @end float'],
+['empty_label_with_space',
+'@float Type, 
+@end float
+'],
+# FIXME no error 'empty node name after expansion'
+['empty_label_with_space_comment',
+'@float Type, @c comment
+@end float
+'],
+['empty_label_no_space',
+'@float Type,
+@end float
+'],
+# FIXME no error 'empty node name after expansion'
+['empty_label_no_space_comment',
+'@float Type,@c comment
+@end float
+'],
 ['ref_to_float',
 '@float Text, Label1
 Float
diff --git a/tp/t/results/float/empty_label_no_space.pl 
b/tp/t/results/float/empty_label_no_space.pl
new file mode 100644
index 0000000000..55e7e91d43
--- /dev/null
+++ b/tp/t/results/float/empty_label_no_space.pl
@@ -0,0 +1,201 @@
+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 %result_indices_sort_strings);
+
+use utf8;
+
+$result_trees{'empty_label_no_space'} = {
+  'contents' => [
+    {
+      'contents' => [
+        {
+          'contents' => [],
+          'parent' => {},
+          'type' => 'preamble_before_content'
+        },
+        {
+          'args' => [
+            {
+              'contents' => [
+                {
+                  'parent' => {},
+                  'text' => 'Type'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            },
+            {
+              'contents' => [
+                {
+                  'extra' => {
+                    'command' => {}
+                  },
+                  'parent' => {},
+                  'text' => '
+',
+                  'type' => 'empty_spaces_before_argument'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            }
+          ],
+          'cmdname' => 'float',
+          'contents' => [
+            {
+              'args' => [
+                {
+                  'contents' => [
+                    {
+                      'parent' => {},
+                      'text' => 'float'
+                    }
+                  ],
+                  'extra' => {
+                    'spaces_after_argument' => '
+'
+                  },
+                  'parent' => {},
+                  'type' => 'line_arg'
+                }
+              ],
+              'cmdname' => 'end',
+              'extra' => {
+                'command_argument' => 'float',
+                'spaces_before_argument' => ' ',
+                'text_arg' => 'float'
+              },
+              'parent' => {},
+              'source_info' => {
+                'file_name' => '',
+                'line_nr' => 2,
+                'macro' => ''
+              }
+            }
+          ],
+          'extra' => {
+            'end_command' => {},
+            'spaces_before_argument' => ' ',
+            'type' => {
+              'content' => [
+                {}
+              ],
+              'normalized' => 'Type'
+            }
+          },
+          'parent' => {},
+          'source_info' => {
+            'file_name' => '',
+            'line_nr' => 1,
+            'macro' => ''
+          }
+        }
+      ],
+      'parent' => {},
+      'type' => 'before_node_section'
+    }
+  ],
+  'type' => 'document_root'
+};
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[0]{'parent'} 
= $result_trees{'empty_label_no_space'}{'contents'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'parent'}
 = $result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'contents'}[0]{'extra'}{'command'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'parent'}
 = $result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'extra'}{'end_command'}
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'extra'}{'type'}{'content'}[0]
 = 
$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'contents'}[1]{'parent'} 
= $result_trees{'empty_label_no_space'}{'contents'}[0];
+$result_trees{'empty_label_no_space'}{'contents'}[0]{'parent'} = 
$result_trees{'empty_label_no_space'};
+
+$result_texis{'empty_label_no_space'} = '@float Type,
+@end float
+';
+
+
+$result_texts{'empty_label_no_space'} = 'Type
+';
+
+$result_errors{'empty_label_no_space'} = [
+  {
+    'error_line' => 'empty node name after expansion `
+\'
+',
+    'file_name' => '',
+    'line_nr' => 1,
+    'macro' => '',
+    'text' => 'empty node name after expansion `
+\'',
+    'type' => 'error'
+  }
+];
+
+
+$result_floats{'empty_label_no_space'} = {
+  'Type' => [
+    {
+      'cmdname' => 'float',
+      'extra' => {
+        'type' => {
+          'content' => [
+            {
+              'text' => 'Type'
+            }
+          ],
+          'normalized' => 'Type'
+        }
+      },
+      'structure' => {}
+    }
+  ]
+};
+
+
+
+$result_converted{'plaintext'}->{'empty_label_no_space'} = 'Type
+';
+
+
+$result_converted{'html'}->{'empty_label_no_space'} = '<!DOCTYPE html>
+<html>
+<!-- Created by texinfo, http://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Untitled Document</title>
+
+<meta name="description" content="Untitled Document">
+<meta name="keywords" content="Untitled Document">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+
+
+</head>
+
+<body lang="en">
+<div class="float">
+<div class="type-number-float"><p><strong class="strong">Type
+</strong></p></div></div>
+
+
+</body>
+</html>
+';
+
+$result_converted_errors{'html'}->{'empty_label_no_space'} = [
+  {
+    'error_line' => 'warning: must specify a title with a title command or @top
+',
+    'text' => 'must specify a title with a title command or @top',
+    'type' => 'warning'
+  }
+];
+
+
+1;
diff --git a/tp/t/results/float/empty_label_no_space_comment.pl 
b/tp/t/results/float/empty_label_no_space_comment.pl
new file mode 100644
index 0000000000..92aee9c8eb
--- /dev/null
+++ b/tp/t/results/float/empty_label_no_space_comment.pl
@@ -0,0 +1,199 @@
+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 %result_indices_sort_strings);
+
+use utf8;
+
+$result_trees{'empty_label_no_space_comment'} = {
+  'contents' => [
+    {
+      'contents' => [
+        {
+          'contents' => [],
+          'parent' => {},
+          'type' => 'preamble_before_content'
+        },
+        {
+          'args' => [
+            {
+              'contents' => [
+                {
+                  'parent' => {},
+                  'text' => 'Type'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            },
+            {
+              'contents' => [],
+              'extra' => {
+                'comment_at_end' => {
+                  'args' => [
+                    {
+                      'parent' => {},
+                      'text' => ' comment
+',
+                      'type' => 'misc_arg'
+                    }
+                  ],
+                  'cmdname' => 'c',
+                  'extra' => {
+                    'misc_args' => [
+                      ' comment
+'
+                    ]
+                  },
+                  'parent' => {}
+                }
+              },
+              'parent' => {},
+              'type' => 'block_line_arg'
+            }
+          ],
+          'cmdname' => 'float',
+          'contents' => [
+            {
+              'args' => [
+                {
+                  'contents' => [
+                    {
+                      'parent' => {},
+                      'text' => 'float'
+                    }
+                  ],
+                  'extra' => {
+                    'spaces_after_argument' => '
+'
+                  },
+                  'parent' => {},
+                  'type' => 'line_arg'
+                }
+              ],
+              'cmdname' => 'end',
+              'extra' => {
+                'command_argument' => 'float',
+                'spaces_before_argument' => ' ',
+                'text_arg' => 'float'
+              },
+              'parent' => {},
+              'source_info' => {
+                'file_name' => '',
+                'line_nr' => 2,
+                'macro' => ''
+              }
+            }
+          ],
+          'extra' => {
+            'end_command' => {},
+            'spaces_before_argument' => ' ',
+            'type' => {
+              'content' => [
+                {}
+              ],
+              'normalized' => 'Type'
+            }
+          },
+          'parent' => {},
+          'source_info' => {
+            'file_name' => '',
+            'line_nr' => 1,
+            'macro' => ''
+          }
+        }
+      ],
+      'parent' => {},
+      'type' => 'before_node_section'
+    }
+  ],
+  'type' => 'document_root'
+};
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_no_space_comment'}{'contents'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'parent'}
 = $result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'}{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'};
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'}{'parent'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'parent'}
 = $result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'extra'}{'end_command'}
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'extra'}{'type'}{'content'}[0]
 = 
$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'contents'}[1]{'parent'}
 = $result_trees{'empty_label_no_space_comment'}{'contents'}[0];
+$result_trees{'empty_label_no_space_comment'}{'contents'}[0]{'parent'} = 
$result_trees{'empty_label_no_space_comment'};
+
+$result_texis{'empty_label_no_space_comment'} = '@float Type,@c comment
+@end float
+';
+
+
+$result_texts{'empty_label_no_space_comment'} = 'Type
+';
+
+$result_errors{'empty_label_no_space_comment'} = [];
+
+
+$result_floats{'empty_label_no_space_comment'} = {
+  'Type' => [
+    {
+      'cmdname' => 'float',
+      'extra' => {
+        'type' => {
+          'content' => [
+            {
+              'text' => 'Type'
+            }
+          ],
+          'normalized' => 'Type'
+        }
+      },
+      'structure' => {}
+    }
+  ]
+};
+
+
+
+$result_converted{'plaintext'}->{'empty_label_no_space_comment'} = 'Type
+';
+
+
+$result_converted{'html'}->{'empty_label_no_space_comment'} = '<!DOCTYPE html>
+<html>
+<!-- Created by texinfo, http://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Untitled Document</title>
+
+<meta name="description" content="Untitled Document">
+<meta name="keywords" content="Untitled Document">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+
+
+</head>
+
+<body lang="en">
+<div class="float">
+<div class="type-number-float"><p><strong class="strong">Type
+</strong></p></div></div>
+
+
+</body>
+</html>
+';
+
+$result_converted_errors{'html'}->{'empty_label_no_space_comment'} = [
+  {
+    'error_line' => 'warning: must specify a title with a title command or @top
+',
+    'text' => 'must specify a title with a title command or @top',
+    'type' => 'warning'
+  }
+];
+
+
+1;
diff --git a/tp/t/results/float/empty_label_with_space.pl 
b/tp/t/results/float/empty_label_with_space.pl
new file mode 100644
index 0000000000..ccc5a73532
--- /dev/null
+++ b/tp/t/results/float/empty_label_with_space.pl
@@ -0,0 +1,201 @@
+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 %result_indices_sort_strings);
+
+use utf8;
+
+$result_trees{'empty_label_with_space'} = {
+  'contents' => [
+    {
+      'contents' => [
+        {
+          'contents' => [],
+          'parent' => {},
+          'type' => 'preamble_before_content'
+        },
+        {
+          'args' => [
+            {
+              'contents' => [
+                {
+                  'parent' => {},
+                  'text' => 'Type'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            },
+            {
+              'contents' => [
+                {
+                  'extra' => {
+                    'command' => {}
+                  },
+                  'parent' => {},
+                  'text' => ' 
+',
+                  'type' => 'empty_spaces_before_argument'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            }
+          ],
+          'cmdname' => 'float',
+          'contents' => [
+            {
+              'args' => [
+                {
+                  'contents' => [
+                    {
+                      'parent' => {},
+                      'text' => 'float'
+                    }
+                  ],
+                  'extra' => {
+                    'spaces_after_argument' => '
+'
+                  },
+                  'parent' => {},
+                  'type' => 'line_arg'
+                }
+              ],
+              'cmdname' => 'end',
+              'extra' => {
+                'command_argument' => 'float',
+                'spaces_before_argument' => ' ',
+                'text_arg' => 'float'
+              },
+              'parent' => {},
+              'source_info' => {
+                'file_name' => '',
+                'line_nr' => 2,
+                'macro' => ''
+              }
+            }
+          ],
+          'extra' => {
+            'end_command' => {},
+            'spaces_before_argument' => ' ',
+            'type' => {
+              'content' => [
+                {}
+              ],
+              'normalized' => 'Type'
+            }
+          },
+          'parent' => {},
+          'source_info' => {
+            'file_name' => '',
+            'line_nr' => 1,
+            'macro' => ''
+          }
+        }
+      ],
+      'parent' => {},
+      'type' => 'before_node_section'
+    }
+  ],
+  'type' => 'document_root'
+};
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_with_space'}{'contents'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'parent'}
 = $result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'contents'}[0]{'extra'}{'command'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'parent'}
 = $result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'extra'}{'end_command'}
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'extra'}{'type'}{'content'}[0]
 = 
$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'contents'}[1]{'parent'}
 = $result_trees{'empty_label_with_space'}{'contents'}[0];
+$result_trees{'empty_label_with_space'}{'contents'}[0]{'parent'} = 
$result_trees{'empty_label_with_space'};
+
+$result_texis{'empty_label_with_space'} = '@float Type, 
+@end float
+';
+
+
+$result_texts{'empty_label_with_space'} = 'Type
+';
+
+$result_errors{'empty_label_with_space'} = [
+  {
+    'error_line' => 'empty node name after expansion ` 
+\'
+',
+    'file_name' => '',
+    'line_nr' => 1,
+    'macro' => '',
+    'text' => 'empty node name after expansion ` 
+\'',
+    'type' => 'error'
+  }
+];
+
+
+$result_floats{'empty_label_with_space'} = {
+  'Type' => [
+    {
+      'cmdname' => 'float',
+      'extra' => {
+        'type' => {
+          'content' => [
+            {
+              'text' => 'Type'
+            }
+          ],
+          'normalized' => 'Type'
+        }
+      },
+      'structure' => {}
+    }
+  ]
+};
+
+
+
+$result_converted{'plaintext'}->{'empty_label_with_space'} = 'Type
+';
+
+
+$result_converted{'html'}->{'empty_label_with_space'} = '<!DOCTYPE html>
+<html>
+<!-- Created by texinfo, http://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Untitled Document</title>
+
+<meta name="description" content="Untitled Document">
+<meta name="keywords" content="Untitled Document">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+
+
+</head>
+
+<body lang="en">
+<div class="float">
+<div class="type-number-float"><p><strong class="strong">Type
+</strong></p></div></div>
+
+
+</body>
+</html>
+';
+
+$result_converted_errors{'html'}->{'empty_label_with_space'} = [
+  {
+    'error_line' => 'warning: must specify a title with a title command or @top
+',
+    'text' => 'must specify a title with a title command or @top',
+    'type' => 'warning'
+  }
+];
+
+
+1;
diff --git a/tp/t/results/float/empty_label_with_space_comment.pl 
b/tp/t/results/float/empty_label_with_space_comment.pl
new file mode 100644
index 0000000000..dd9d9c8c42
--- /dev/null
+++ b/tp/t/results/float/empty_label_with_space_comment.pl
@@ -0,0 +1,200 @@
+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 %result_indices_sort_strings);
+
+use utf8;
+
+$result_trees{'empty_label_with_space_comment'} = {
+  'contents' => [
+    {
+      'contents' => [
+        {
+          'contents' => [],
+          'parent' => {},
+          'type' => 'preamble_before_content'
+        },
+        {
+          'args' => [
+            {
+              'contents' => [
+                {
+                  'parent' => {},
+                  'text' => 'Type'
+                }
+              ],
+              'parent' => {},
+              'type' => 'block_line_arg'
+            },
+            {
+              'contents' => [],
+              'extra' => {
+                'comment_at_end' => {
+                  'args' => [
+                    {
+                      'parent' => {},
+                      'text' => ' comment
+',
+                      'type' => 'misc_arg'
+                    }
+                  ],
+                  'cmdname' => 'c',
+                  'extra' => {
+                    'misc_args' => [
+                      ' comment
+'
+                    ]
+                  },
+                  'parent' => {}
+                },
+                'spaces_before_argument' => ' '
+              },
+              'parent' => {},
+              'type' => 'block_line_arg'
+            }
+          ],
+          'cmdname' => 'float',
+          'contents' => [
+            {
+              'args' => [
+                {
+                  'contents' => [
+                    {
+                      'parent' => {},
+                      'text' => 'float'
+                    }
+                  ],
+                  'extra' => {
+                    'spaces_after_argument' => '
+'
+                  },
+                  'parent' => {},
+                  'type' => 'line_arg'
+                }
+              ],
+              'cmdname' => 'end',
+              'extra' => {
+                'command_argument' => 'float',
+                'spaces_before_argument' => ' ',
+                'text_arg' => 'float'
+              },
+              'parent' => {},
+              'source_info' => {
+                'file_name' => '',
+                'line_nr' => 2,
+                'macro' => ''
+              }
+            }
+          ],
+          'extra' => {
+            'end_command' => {},
+            'spaces_before_argument' => ' ',
+            'type' => {
+              'content' => [
+                {}
+              ],
+              'normalized' => 'Type'
+            }
+          },
+          'parent' => {},
+          'source_info' => {
+            'file_name' => '',
+            'line_nr' => 1,
+            'macro' => ''
+          }
+        }
+      ],
+      'parent' => {},
+      'type' => 'before_node_section'
+    }
+  ],
+  'type' => 'document_root'
+};
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[0]{'parent'}
 = $result_trees{'empty_label_with_space_comment'}{'contents'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'}{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'};
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'extra'}{'comment_at_end'}{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[1]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'extra'}{'end_command'}
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'contents'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'extra'}{'type'}{'content'}[0]
 = 
$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'contents'}[1]{'parent'}
 = $result_trees{'empty_label_with_space_comment'}{'contents'}[0];
+$result_trees{'empty_label_with_space_comment'}{'contents'}[0]{'parent'} = 
$result_trees{'empty_label_with_space_comment'};
+
+$result_texis{'empty_label_with_space_comment'} = '@float Type, @c comment
+@end float
+';
+
+
+$result_texts{'empty_label_with_space_comment'} = 'Type
+';
+
+$result_errors{'empty_label_with_space_comment'} = [];
+
+
+$result_floats{'empty_label_with_space_comment'} = {
+  'Type' => [
+    {
+      'cmdname' => 'float',
+      'extra' => {
+        'type' => {
+          'content' => [
+            {
+              'text' => 'Type'
+            }
+          ],
+          'normalized' => 'Type'
+        }
+      },
+      'structure' => {}
+    }
+  ]
+};
+
+
+
+$result_converted{'plaintext'}->{'empty_label_with_space_comment'} = 'Type
+';
+
+
+$result_converted{'html'}->{'empty_label_with_space_comment'} = '<!DOCTYPE 
html>
+<html>
+<!-- Created by texinfo, http://www.gnu.org/software/texinfo/ -->
+<head>
+<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
+<title>Untitled Document</title>
+
+<meta name="description" content="Untitled Document">
+<meta name="keywords" content="Untitled Document">
+<meta name="resource-type" content="document">
+<meta name="distribution" content="global">
+<meta name="viewport" content="width=device-width,initial-scale=1">
+
+
+
+</head>
+
+<body lang="en">
+<div class="float">
+<div class="type-number-float"><p><strong class="strong">Type
+</strong></p></div></div>
+
+
+</body>
+</html>
+';
+
+$result_converted_errors{'html'}->{'empty_label_with_space_comment'} = [
+  {
+    'error_line' => 'warning: must specify a title with a title command or @top
+',
+    'text' => 'must specify a title with a title command or @top',
+    'type' => 'warning'
+  }
+];
+
+
+1;



reply via email to

[Prev in Thread] Current Thread [Next in Thread]