[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[8033] 60macro.t line_after_recursive_call
From: |
gavinsmith0123 |
Subject: |
[8033] 60macro.t line_after_recursive_call |
Date: |
Thu, 9 Aug 2018 14:38:11 -0400 (EDT) |
Revision: 8033
http://svn.sv.gnu.org/viewvc/?view=rev&root=texinfo&revision=8033
Author: gavin
Date: 2018-08-09 14:38:11 -0400 (Thu, 09 Aug 2018)
Log Message:
-----------
60macro.t line_after_recursive_call
Modified Paths:
--------------
trunk/ChangeLog
trunk/tp/t/60macro.t
Added Paths:
-----------
trunk/tp/t/results/macro/line_after_recursive_call.pl
Modified: trunk/ChangeLog
===================================================================
--- trunk/ChangeLog 2018-08-09 18:12:03 UTC (rev 8032)
+++ trunk/ChangeLog 2018-08-09 18:38:11 UTC (rev 8033)
@@ -1,5 +1,9 @@
2018-08-09 Gavin Smith <address@hidden>
+ * tp/t/60macro.t (line_after_recursive_call): New test.
+
+2018-08-09 Gavin Smith <address@hidden>
+
* tp/Texinfo/Transformations.pm (_new_node): Call
'parse_node_manual' from Texinfo::Common instead of
Texinfo::Parser, and do not call Texinfo::Parser::register_label.
Modified: trunk/tp/t/60macro.t
===================================================================
--- trunk/tp/t/60macro.t 2018-08-09 18:12:03 UTC (rev 8032)
+++ trunk/tp/t/60macro.t 2018-08-09 18:38:11 UTC (rev 8033)
@@ -931,6 +931,13 @@
@mactwo{}
'],
+['line_after_recursive_call',
+'@macro mac
+ggg
address@hidden xxx
+fff
address@hidden macro
address@hidden'],
['unknown_macro_on_line_command',
'@setfilename @begin{}file'
],
@@ -985,7 +992,7 @@
}
@mymacro{}.
-']
+'],
);
my @todo =(
Added: trunk/tp/t/results/macro/line_after_recursive_call.pl
===================================================================
--- trunk/tp/t/results/macro/line_after_recursive_call.pl
(rev 0)
+++ trunk/tp/t/results/macro/line_after_recursive_call.pl 2018-08-09
18:38:11 UTC (rev 8033)
@@ -0,0 +1,127 @@
+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{'line_after_recursive_call'} = {
+ 'contents' => [
+ {
+ 'args' => [
+ {
+ 'parent' => {},
+ 'text' => 'mac',
+ 'type' => 'macro_name'
+ }
+ ],
+ 'cmdname' => 'macro',
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'ggg
+',
+ 'type' => 'raw'
+ },
+ {
+ 'parent' => {},
+ 'text' => '@mac xxx
+',
+ 'type' => 'raw'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'fff',
+ 'type' => 'raw'
+ },
+ {
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'last_raw_newline'
+ }
+ ],
+ 'extra' => {
+ 'arg_line' => ' mac
+'
+ },
+ 'line_nr' => {
+ 'file_name' => '',
+ 'line_nr' => 1,
+ 'macro' => ''
+ },
+ 'parent' => {}
+ },
+ {
+ 'extra' => {
+ 'command' => {}
+ },
+ 'parent' => {},
+ 'text' => '
+',
+ 'type' => 'empty_line_after_command'
+ },
+ {
+ 'contents' => [
+ {
+ 'parent' => {},
+ 'text' => 'ggg
+'
+ },
+ {
+ 'parent' => {},
+ 'text' => ' xxx
+'
+ },
+ {
+ 'parent' => {},
+ 'text' => 'fff'
+ }
+ ],
+ 'parent' => {},
+ 'type' => 'paragraph'
+ }
+ ],
+ 'type' => 'text_root'
+};
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'args'}[0]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'contents'}[0]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'contents'}[1]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'contents'}[2]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'contents'}[3]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[0]{'parent'} =
$result_trees{'line_after_recursive_call'};
+$result_trees{'line_after_recursive_call'}{'contents'}[1]{'extra'}{'command'}
= $result_trees{'line_after_recursive_call'}{'contents'}[0];
+$result_trees{'line_after_recursive_call'}{'contents'}[1]{'parent'} =
$result_trees{'line_after_recursive_call'};
+$result_trees{'line_after_recursive_call'}{'contents'}[2]{'contents'}[0]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[2];
+$result_trees{'line_after_recursive_call'}{'contents'}[2]{'contents'}[1]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[2];
+$result_trees{'line_after_recursive_call'}{'contents'}[2]{'contents'}[2]{'parent'}
= $result_trees{'line_after_recursive_call'}{'contents'}[2];
+$result_trees{'line_after_recursive_call'}{'contents'}[2]{'parent'} =
$result_trees{'line_after_recursive_call'};
+
+$result_texis{'line_after_recursive_call'} = '@macro mac
+ggg
address@hidden xxx
+fff
address@hidden macro
+ggg
+ xxx
+fff';
+
+
+$result_texts{'line_after_recursive_call'} = 'ggg
+ xxx
+fff';
+
+$result_errors{'line_after_recursive_call'} = [
+ {
+ 'error_line' => ':6: recursive call of macro mac is not allowed; use
@rmacro if needed (possibly involving @mac)
+',
+ 'file_name' => '',
+ 'line_nr' => 6,
+ 'macro' => 'mac',
+ 'text' => 'recursive call of macro mac is not allowed; use @rmacro if
needed',
+ 'type' => 'error'
+ }
+];
+
+
+1;
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [8033] 60macro.t line_after_recursive_call,
gavinsmith0123 <=