implicit_quoting_one_arg.pl 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138
  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{'implicit_quoting_one_arg'} = {
  7. 'contents' => [
  8. {
  9. 'parent' => {},
  10. 'text' => '
  11. ',
  12. 'type' => 'empty_line'
  13. },
  14. {
  15. 'args' => [
  16. {
  17. 'parent' => {},
  18. 'text' => 'FIXME',
  19. 'type' => 'macro_name'
  20. },
  21. {
  22. 'parent' => {},
  23. 'text' => 'a',
  24. 'type' => 'macro_arg'
  25. }
  26. ],
  27. 'cmdname' => 'macro',
  28. 'contents' => [
  29. {
  30. 'parent' => {},
  31. 'text' => '@strong{FIXME: \\a\\}',
  32. 'type' => 'raw'
  33. },
  34. {
  35. 'parent' => {},
  36. 'text' => '
  37. ',
  38. 'type' => 'last_raw_newline'
  39. }
  40. ],
  41. 'extra' => {
  42. 'arg_line' => ' FIXME{a}
  43. '
  44. },
  45. 'line_nr' => {
  46. 'file_name' => '',
  47. 'line_nr' => 2,
  48. 'macro' => ''
  49. },
  50. 'parent' => {}
  51. },
  52. {
  53. 'extra' => {
  54. 'command' => {}
  55. },
  56. 'parent' => {},
  57. 'text' => '
  58. ',
  59. 'type' => 'empty_line_after_command'
  60. },
  61. {
  62. 'parent' => {},
  63. 'text' => '
  64. ',
  65. 'type' => 'empty_line'
  66. },
  67. {
  68. 'contents' => [
  69. {
  70. 'args' => [
  71. {
  72. 'contents' => [
  73. {
  74. 'parent' => {},
  75. 'text' => 'FIXME: Many arguments, separated by commas, are processed here'
  76. }
  77. ],
  78. 'parent' => {},
  79. 'type' => 'brace_command_arg'
  80. }
  81. ],
  82. 'cmdname' => 'strong',
  83. 'contents' => [],
  84. 'line_nr' => {
  85. 'file_name' => '',
  86. 'line_nr' => 6,
  87. 'macro' => 'FIXME'
  88. },
  89. 'parent' => {}
  90. },
  91. {
  92. 'parent' => {},
  93. 'text' => '
  94. '
  95. }
  96. ],
  97. 'parent' => {},
  98. 'type' => 'paragraph'
  99. }
  100. ],
  101. 'type' => 'text_root'
  102. };
  103. $result_trees{'implicit_quoting_one_arg'}{'contents'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'};
  104. $result_trees{'implicit_quoting_one_arg'}{'contents'}[1]{'args'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[1];
  105. $result_trees{'implicit_quoting_one_arg'}{'contents'}[1]{'args'}[1]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[1];
  106. $result_trees{'implicit_quoting_one_arg'}{'contents'}[1]{'contents'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[1];
  107. $result_trees{'implicit_quoting_one_arg'}{'contents'}[1]{'contents'}[1]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[1];
  108. $result_trees{'implicit_quoting_one_arg'}{'contents'}[1]{'parent'} = $result_trees{'implicit_quoting_one_arg'};
  109. $result_trees{'implicit_quoting_one_arg'}{'contents'}[2]{'extra'}{'command'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[1];
  110. $result_trees{'implicit_quoting_one_arg'}{'contents'}[2]{'parent'} = $result_trees{'implicit_quoting_one_arg'};
  111. $result_trees{'implicit_quoting_one_arg'}{'contents'}[3]{'parent'} = $result_trees{'implicit_quoting_one_arg'};
  112. $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[0]{'args'}[0];
  113. $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[0];
  114. $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[0]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[4];
  115. $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'contents'}[1]{'parent'} = $result_trees{'implicit_quoting_one_arg'}{'contents'}[4];
  116. $result_trees{'implicit_quoting_one_arg'}{'contents'}[4]{'parent'} = $result_trees{'implicit_quoting_one_arg'};
  117. $result_texis{'implicit_quoting_one_arg'} = '
  118. @macro FIXME{a}
  119. @strong{FIXME: \\a\\}
  120. @end macro
  121. @strong{FIXME: Many arguments, separated by commas, are processed here}
  122. ';
  123. $result_texts{'implicit_quoting_one_arg'} = '
  124. FIXME: Many arguments, separated by commas, are processed here
  125. ';
  126. $result_errors{'implicit_quoting_one_arg'} = [];
  127. 1;