w_in_multitable.pl 15 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327
  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{'w_in_multitable'} = {
  7. 'contents' => [
  8. {
  9. 'args' => [
  10. {
  11. 'contents' => [
  12. {
  13. 'extra' => {
  14. 'command' => {}
  15. },
  16. 'parent' => {},
  17. 'text' => ' ',
  18. 'type' => 'empty_spaces_after_command'
  19. },
  20. {
  21. 'contents' => [
  22. {
  23. 'parent' => {},
  24. 'text' => 'aaaaaaaaa'
  25. }
  26. ],
  27. 'parent' => {},
  28. 'type' => 'bracketed'
  29. },
  30. {
  31. 'parent' => {},
  32. 'text' => ' '
  33. },
  34. {
  35. 'contents' => [
  36. {
  37. 'parent' => {},
  38. 'text' => 'bbbbbbbbbbb'
  39. }
  40. ],
  41. 'parent' => {},
  42. 'type' => 'bracketed'
  43. },
  44. {
  45. 'parent' => {},
  46. 'text' => '
  47. '
  48. }
  49. ],
  50. 'parent' => {},
  51. 'type' => 'block_line_arg'
  52. }
  53. ],
  54. 'cmdname' => 'multitable',
  55. 'contents' => [
  56. {
  57. 'contents' => [
  58. {
  59. 'contents' => [
  60. {
  61. 'cmdname' => 'item',
  62. 'contents' => [
  63. {
  64. 'extra' => {
  65. 'command' => {}
  66. },
  67. 'parent' => {},
  68. 'text' => ' ',
  69. 'type' => 'empty_spaces_after_command'
  70. },
  71. {
  72. 'contents' => [
  73. {
  74. 'args' => [
  75. {
  76. 'contents' => [
  77. {
  78. 'parent' => {},
  79. 'text' => 'aaaaaaaa
  80. '
  81. },
  82. {
  83. 'parent' => {},
  84. 'text' => 'bbbbbbbbbb'
  85. }
  86. ],
  87. 'parent' => {},
  88. 'type' => 'brace_command_arg'
  89. }
  90. ],
  91. 'cmdname' => 'w',
  92. 'contents' => [],
  93. 'line_nr' => {
  94. 'file_name' => '',
  95. 'line_nr' => 2,
  96. 'macro' => ''
  97. },
  98. 'parent' => {}
  99. },
  100. {
  101. 'parent' => {},
  102. 'text' => '
  103. '
  104. }
  105. ],
  106. 'parent' => {},
  107. 'type' => 'paragraph'
  108. }
  109. ],
  110. 'extra' => {
  111. 'cell_number' => 1,
  112. 'spaces_after_command' => {}
  113. },
  114. 'line_nr' => {},
  115. 'parent' => {}
  116. },
  117. {
  118. 'cmdname' => 'tab',
  119. 'contents' => [
  120. {
  121. 'extra' => {
  122. 'command' => {}
  123. },
  124. 'parent' => {},
  125. 'text' => ' ',
  126. 'type' => 'empty_spaces_after_command'
  127. },
  128. {
  129. 'contents' => [
  130. {
  131. 'parent' => {},
  132. 'text' => 'gg
  133. '
  134. }
  135. ],
  136. 'parent' => {},
  137. 'type' => 'paragraph'
  138. }
  139. ],
  140. 'extra' => {
  141. 'cell_number' => 2,
  142. 'spaces_after_command' => {}
  143. },
  144. 'line_nr' => {
  145. 'file_name' => '',
  146. 'line_nr' => 4,
  147. 'macro' => ''
  148. },
  149. 'parent' => {}
  150. }
  151. ],
  152. 'extra' => {
  153. 'row_number' => 1
  154. },
  155. 'parent' => {},
  156. 'type' => 'row'
  157. }
  158. ],
  159. 'parent' => {},
  160. 'type' => 'multitable_body'
  161. },
  162. {
  163. 'args' => [
  164. {
  165. 'contents' => [
  166. {
  167. 'extra' => {
  168. 'command' => {}
  169. },
  170. 'parent' => {},
  171. 'text' => ' ',
  172. 'type' => 'empty_spaces_after_command'
  173. },
  174. {
  175. 'parent' => {},
  176. 'text' => 'multitable'
  177. },
  178. {
  179. 'parent' => {},
  180. 'text' => '
  181. ',
  182. 'type' => 'spaces_at_end'
  183. }
  184. ],
  185. 'parent' => {},
  186. 'type' => 'misc_line_arg'
  187. }
  188. ],
  189. 'cmdname' => 'end',
  190. 'extra' => {
  191. 'command' => {},
  192. 'command_argument' => 'multitable',
  193. 'spaces_after_command' => {},
  194. 'text_arg' => 'multitable'
  195. },
  196. 'line_nr' => {
  197. 'file_name' => '',
  198. 'line_nr' => 5,
  199. 'macro' => ''
  200. },
  201. 'parent' => {}
  202. }
  203. ],
  204. 'extra' => {
  205. 'end_command' => {},
  206. 'max_columns' => 2,
  207. 'prototypes' => [
  208. {
  209. 'contents' => [],
  210. 'type' => 'bracketed_multitable_prototype'
  211. },
  212. {
  213. 'contents' => [],
  214. 'type' => 'bracketed_multitable_prototype'
  215. }
  216. ],
  217. 'prototypes_line' => [
  218. {
  219. 'text' => ' ',
  220. 'type' => 'prototype_space'
  221. },
  222. {},
  223. {
  224. 'text' => ' ',
  225. 'type' => 'prototype_space'
  226. },
  227. {},
  228. {
  229. 'text' => '
  230. ',
  231. 'type' => 'prototype_space'
  232. }
  233. ],
  234. 'spaces_after_command' => {}
  235. },
  236. 'line_nr' => {
  237. 'file_name' => '',
  238. 'line_nr' => 1,
  239. 'macro' => ''
  240. },
  241. 'parent' => {}
  242. }
  243. ],
  244. 'type' => 'text_root'
  245. };
  246. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'w_in_multitable'}{'contents'}[0];
  247. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0];
  248. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1];
  249. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0];
  250. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[2]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0];
  251. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[3]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[3];
  252. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[3]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0];
  253. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[4]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0];
  254. $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0];
  255. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0];
  256. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0];
  257. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
  258. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0];
  259. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0];
  260. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1];
  261. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1];
  262. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0];
  263. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'extra'}{'spaces_after_command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0];
  264. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'line_nr'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'line_nr'};
  265. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0];
  266. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'extra'}{'command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1];
  267. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1];
  268. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1];
  269. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1];
  270. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'extra'}{'spaces_after_command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'contents'}[0];
  271. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0];
  272. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0];
  273. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0];
  274. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1];
  275. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0];
  276. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0];
  277. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[2]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0];
  278. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1];
  279. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'extra'}{'command'} = $result_trees{'w_in_multitable'}{'contents'}[0];
  280. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'extra'}{'spaces_after_command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'args'}[0]{'contents'}[0];
  281. $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'w_in_multitable'}{'contents'}[0];
  282. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'end_command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'contents'}[1];
  283. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'prototypes'}[0]{'contents'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'contents'};
  284. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'prototypes'}[1]{'contents'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[3]{'contents'};
  285. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'prototypes_line'}[1] = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1];
  286. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'prototypes_line'}[3] = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[3];
  287. $result_trees{'w_in_multitable'}{'contents'}[0]{'extra'}{'spaces_after_command'} = $result_trees{'w_in_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0];
  288. $result_trees{'w_in_multitable'}{'contents'}[0]{'parent'} = $result_trees{'w_in_multitable'};
  289. $result_texis{'w_in_multitable'} = '@multitable {aaaaaaaaa} {bbbbbbbbbbb}
  290. @item @w{aaaaaaaa
  291. bbbbbbbbbb}
  292. @tab gg
  293. @end multitable
  294. ';
  295. $result_texts{'w_in_multitable'} = 'aaaaaaaa
  296. bbbbbbbbbb
  297. gg
  298. ';
  299. $result_errors{'w_in_multitable'} = [];
  300. $result_converted{'plaintext'}->{'w_in_multitable'} = 'aaaaaaaa bbbbbbbbbbgg
  301. ';
  302. $result_converted{'html_text'}->{'w_in_multitable'} = '<table>
  303. <tr><td>aaaaaaaa&nbsp;bbbbbbbbbb<!-- /@w --></td><td>gg</td></tr>
  304. </table>
  305. ';
  306. $result_converted{'xml'}->{'w_in_multitable'} = '<multitable spaces=" " endspaces=" "><columnprototypes><columnprototype bracketed="on">aaaaaaaaa</columnprototype> <columnprototype bracketed="on">bbbbbbbbbbb</columnprototype></columnprototypes>
  307. <tbody><row><entry command="item" spaces=" "><para><w>aaaaaaaa
  308. bbbbbbbbbb</w>
  309. </para></entry><entry command="tab" spaces=" "><para>gg
  310. </para></entry></row></tbody></multitable>
  311. ';
  312. 1;