macro_in_end_argument.pl 5.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163
  1. use vars qw(%result_texis %result_texts %result_trees %result_errors
  2. %result_indices %result_sectioning %result_nodes %result_menus
  3. %result_floats %result_converted %result_converted_errors
  4. %result_elements %result_directions_text);
  5. use utf8;
  6. $result_trees{'macro_in_end_argument'} = {
  7. 'contents' => [
  8. {
  9. 'args' => [
  10. {
  11. 'parent' => {},
  12. 'text' => 'acartouche',
  13. 'type' => 'macro_name'
  14. }
  15. ],
  16. 'cmdname' => 'macro',
  17. 'contents' => [
  18. {
  19. 'parent' => {},
  20. 'text' => 'cartouche',
  21. 'type' => 'raw'
  22. },
  23. {
  24. 'parent' => {},
  25. 'text' => '
  26. ',
  27. 'type' => 'last_raw_newline'
  28. }
  29. ],
  30. 'extra' => {
  31. 'arg_line' => ' acartouche
  32. '
  33. },
  34. 'line_nr' => {
  35. 'file_name' => '',
  36. 'line_nr' => 1,
  37. 'macro' => ''
  38. },
  39. 'parent' => {}
  40. },
  41. {
  42. 'extra' => {
  43. 'command' => {}
  44. },
  45. 'parent' => {},
  46. 'text' => '
  47. ',
  48. 'type' => 'empty_line_after_command'
  49. },
  50. {
  51. 'parent' => {},
  52. 'text' => '
  53. ',
  54. 'type' => 'empty_line'
  55. },
  56. {
  57. 'cmdname' => 'cartouche',
  58. 'contents' => [
  59. {
  60. 'extra' => {
  61. 'command' => {}
  62. },
  63. 'parent' => {},
  64. 'text' => '
  65. ',
  66. 'type' => 'empty_line_after_command'
  67. },
  68. {
  69. 'args' => [
  70. {
  71. 'contents' => [
  72. {
  73. 'extra' => {
  74. 'command' => {}
  75. },
  76. 'parent' => {},
  77. 'text' => ' ',
  78. 'type' => 'empty_spaces_after_command'
  79. },
  80. {
  81. 'parent' => {},
  82. 'text' => 'cartouche'
  83. },
  84. {
  85. 'parent' => {},
  86. 'text' => '
  87. ',
  88. 'type' => 'spaces_at_end'
  89. }
  90. ],
  91. 'parent' => {},
  92. 'type' => 'misc_line_arg'
  93. }
  94. ],
  95. 'cmdname' => 'end',
  96. 'extra' => {
  97. 'command' => {},
  98. 'command_argument' => 'cartouche',
  99. 'spaces_after_command' => {},
  100. 'text_arg' => 'cartouche'
  101. },
  102. 'line_nr' => {
  103. 'file_name' => '',
  104. 'line_nr' => 6,
  105. 'macro' => ''
  106. },
  107. 'parent' => {}
  108. }
  109. ],
  110. 'extra' => {
  111. 'end_command' => {},
  112. 'spaces_after_command' => {}
  113. },
  114. 'line_nr' => {
  115. 'file_name' => '',
  116. 'line_nr' => 5,
  117. 'macro' => ''
  118. },
  119. 'parent' => {}
  120. }
  121. ],
  122. 'type' => 'text_root'
  123. };
  124. $result_trees{'macro_in_end_argument'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[0];
  125. $result_trees{'macro_in_end_argument'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[0];
  126. $result_trees{'macro_in_end_argument'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[0];
  127. $result_trees{'macro_in_end_argument'}{'contents'}[0]{'parent'} = $result_trees{'macro_in_end_argument'};
  128. $result_trees{'macro_in_end_argument'}{'contents'}[1]{'extra'}{'command'} = $result_trees{'macro_in_end_argument'}{'contents'}[0];
  129. $result_trees{'macro_in_end_argument'}{'contents'}[1]{'parent'} = $result_trees{'macro_in_end_argument'};
  130. $result_trees{'macro_in_end_argument'}{'contents'}[2]{'parent'} = $result_trees{'macro_in_end_argument'};
  131. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[0]{'extra'}{'command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3];
  132. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[0]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3];
  133. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1];
  134. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0];
  135. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0];
  136. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'contents'}[2]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0];
  137. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1];
  138. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'extra'}{'command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3];
  139. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'extra'}{'spaces_after_command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'args'}[0]{'contents'}[0];
  140. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1]{'parent'} = $result_trees{'macro_in_end_argument'}{'contents'}[3];
  141. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'extra'}{'end_command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[1];
  142. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'extra'}{'spaces_after_command'} = $result_trees{'macro_in_end_argument'}{'contents'}[3]{'contents'}[0];
  143. $result_trees{'macro_in_end_argument'}{'contents'}[3]{'parent'} = $result_trees{'macro_in_end_argument'};
  144. $result_texis{'macro_in_end_argument'} = '@macro acartouche
  145. cartouche
  146. @end macro
  147. @cartouche
  148. @end cartouche
  149. ';
  150. $result_texts{'macro_in_end_argument'} = '
  151. ';
  152. $result_errors{'macro_in_end_argument'} = [];
  153. 1;