macro_in_macro_arg.pl 7.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261
  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_macro_arg'} = {
  7. 'contents' => [
  8. {
  9. 'parent' => {},
  10. 'text' => '
  11. ',
  12. 'type' => 'empty_line'
  13. },
  14. {
  15. 'args' => [
  16. {
  17. 'parent' => {},
  18. 'text' => 'macroone',
  19. 'type' => 'macro_name'
  20. }
  21. ],
  22. 'cmdname' => 'macro',
  23. 'contents' => [
  24. {
  25. 'parent' => {},
  26. 'text' => 'a, @macrotwo',
  27. 'type' => 'raw'
  28. },
  29. {
  30. 'parent' => {},
  31. 'text' => '
  32. ',
  33. 'type' => 'last_raw_newline'
  34. }
  35. ],
  36. 'extra' => {
  37. 'arg_line' => ' macroone
  38. '
  39. },
  40. 'line_nr' => {
  41. 'file_name' => '',
  42. 'line_nr' => 2,
  43. 'macro' => ''
  44. },
  45. 'parent' => {}
  46. },
  47. {
  48. 'extra' => {
  49. 'command' => {}
  50. },
  51. 'parent' => {},
  52. 'text' => '
  53. ',
  54. 'type' => 'empty_line_after_command'
  55. },
  56. {
  57. 'parent' => {},
  58. 'text' => '
  59. ',
  60. 'type' => 'empty_line'
  61. },
  62. {
  63. 'args' => [
  64. {
  65. 'parent' => {},
  66. 'text' => 'macrotwo',
  67. 'type' => 'macro_name'
  68. },
  69. {
  70. 'parent' => {},
  71. 'text' => 'arg',
  72. 'type' => 'macro_arg'
  73. }
  74. ],
  75. 'cmdname' => 'macro',
  76. 'contents' => [
  77. {
  78. 'parent' => {},
  79. 'text' => 'hello \\arg\\ after arg',
  80. 'type' => 'raw'
  81. },
  82. {
  83. 'parent' => {},
  84. 'text' => '
  85. ',
  86. 'type' => 'last_raw_newline'
  87. }
  88. ],
  89. 'extra' => {
  90. 'arg_line' => ' macrotwo{arg}
  91. '
  92. },
  93. 'line_nr' => {
  94. 'file_name' => '',
  95. 'line_nr' => 6,
  96. 'macro' => ''
  97. },
  98. 'parent' => {}
  99. },
  100. {
  101. 'extra' => {
  102. 'command' => {}
  103. },
  104. 'parent' => {},
  105. 'text' => '
  106. ',
  107. 'type' => 'empty_line_after_command'
  108. },
  109. {
  110. 'parent' => {},
  111. 'text' => '
  112. ',
  113. 'type' => 'empty_line'
  114. },
  115. {
  116. 'args' => [
  117. {
  118. 'parent' => {},
  119. 'text' => 'macrothree',
  120. 'type' => 'macro_name'
  121. },
  122. {
  123. 'parent' => {},
  124. 'text' => 'text',
  125. 'type' => 'macro_arg'
  126. },
  127. {
  128. 'parent' => {},
  129. 'text' => 'arg',
  130. 'type' => 'macro_arg'
  131. }
  132. ],
  133. 'cmdname' => 'macro',
  134. 'contents' => [
  135. {
  136. 'parent' => {},
  137. 'text' => '\\text\\
  138. ',
  139. 'type' => 'raw'
  140. },
  141. {
  142. 'parent' => {},
  143. 'text' => '&&&& \\arg\\',
  144. 'type' => 'raw'
  145. },
  146. {
  147. 'parent' => {},
  148. 'text' => '
  149. ',
  150. 'type' => 'last_raw_newline'
  151. }
  152. ],
  153. 'extra' => {
  154. 'arg_line' => ' macrothree{text, arg}
  155. '
  156. },
  157. 'line_nr' => {
  158. 'file_name' => '',
  159. 'line_nr' => 10,
  160. 'macro' => ''
  161. },
  162. 'parent' => {}
  163. },
  164. {
  165. 'extra' => {
  166. 'command' => {}
  167. },
  168. 'parent' => {},
  169. 'text' => '
  170. ',
  171. 'type' => 'empty_line_after_command'
  172. },
  173. {
  174. 'parent' => {},
  175. 'text' => '
  176. ',
  177. 'type' => 'empty_line'
  178. },
  179. {
  180. 'contents' => [
  181. {
  182. 'parent' => {},
  183. 'text' => 'a, hello text for macro2 after arg
  184. '
  185. },
  186. {
  187. 'parent' => {},
  188. 'text' => '&&&&
  189. '
  190. }
  191. ],
  192. 'parent' => {},
  193. 'type' => 'paragraph'
  194. }
  195. ],
  196. 'type' => 'text_root'
  197. };
  198. $result_trees{'macro_in_macro_arg'}{'contents'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'};
  199. $result_trees{'macro_in_macro_arg'}{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[1];
  200. $result_trees{'macro_in_macro_arg'}{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[1];
  201. $result_trees{'macro_in_macro_arg'}{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[1];
  202. $result_trees{'macro_in_macro_arg'}{'contents'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'};
  203. $result_trees{'macro_in_macro_arg'}{'contents'}[2]{'extra'}{'command'} = $result_trees{'macro_in_macro_arg'}{'contents'}[1];
  204. $result_trees{'macro_in_macro_arg'}{'contents'}[2]{'parent'} = $result_trees{'macro_in_macro_arg'};
  205. $result_trees{'macro_in_macro_arg'}{'contents'}[3]{'parent'} = $result_trees{'macro_in_macro_arg'};
  206. $result_trees{'macro_in_macro_arg'}{'contents'}[4]{'args'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[4];
  207. $result_trees{'macro_in_macro_arg'}{'contents'}[4]{'args'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[4];
  208. $result_trees{'macro_in_macro_arg'}{'contents'}[4]{'contents'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[4];
  209. $result_trees{'macro_in_macro_arg'}{'contents'}[4]{'contents'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[4];
  210. $result_trees{'macro_in_macro_arg'}{'contents'}[4]{'parent'} = $result_trees{'macro_in_macro_arg'};
  211. $result_trees{'macro_in_macro_arg'}{'contents'}[5]{'extra'}{'command'} = $result_trees{'macro_in_macro_arg'}{'contents'}[4];
  212. $result_trees{'macro_in_macro_arg'}{'contents'}[5]{'parent'} = $result_trees{'macro_in_macro_arg'};
  213. $result_trees{'macro_in_macro_arg'}{'contents'}[6]{'parent'} = $result_trees{'macro_in_macro_arg'};
  214. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'args'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  215. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'args'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  216. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'args'}[2]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  217. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'contents'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  218. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'contents'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  219. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'contents'}[2]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  220. $result_trees{'macro_in_macro_arg'}{'contents'}[7]{'parent'} = $result_trees{'macro_in_macro_arg'};
  221. $result_trees{'macro_in_macro_arg'}{'contents'}[8]{'extra'}{'command'} = $result_trees{'macro_in_macro_arg'}{'contents'}[7];
  222. $result_trees{'macro_in_macro_arg'}{'contents'}[8]{'parent'} = $result_trees{'macro_in_macro_arg'};
  223. $result_trees{'macro_in_macro_arg'}{'contents'}[9]{'parent'} = $result_trees{'macro_in_macro_arg'};
  224. $result_trees{'macro_in_macro_arg'}{'contents'}[10]{'contents'}[0]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[10];
  225. $result_trees{'macro_in_macro_arg'}{'contents'}[10]{'contents'}[1]{'parent'} = $result_trees{'macro_in_macro_arg'}{'contents'}[10];
  226. $result_trees{'macro_in_macro_arg'}{'contents'}[10]{'parent'} = $result_trees{'macro_in_macro_arg'};
  227. $result_texis{'macro_in_macro_arg'} = '
  228. @macro macroone
  229. a, @macrotwo
  230. @end macro
  231. @macro macrotwo{arg}
  232. hello \\arg\\ after arg
  233. @end macro
  234. @macro macrothree{text, arg}
  235. \\text\\
  236. &&&& \\arg\\
  237. @end macro
  238. a, hello text for macro2 after arg
  239. &&&&
  240. ';
  241. $result_texts{'macro_in_macro_arg'} = '
  242. a, hello text for macro2 after arg
  243. &&&&
  244. ';
  245. $result_errors{'macro_in_macro_arg'} = [];
  246. 1;