ifset_and_end_isef_in_macro.pl 4.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153
  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{'ifset_and_end_isef_in_macro'} = {
  7. 'contents' => [
  8. {
  9. 'args' => [
  10. {
  11. 'parent' => {},
  12. 'text' => 'beginifset',
  13. 'type' => 'macro_name'
  14. }
  15. ],
  16. 'cmdname' => 'macro',
  17. 'contents' => [
  18. {
  19. 'parent' => {},
  20. 'text' => '@ifset a',
  21. 'type' => 'raw'
  22. },
  23. {
  24. 'parent' => {},
  25. 'text' => '
  26. ',
  27. 'type' => 'last_raw_newline'
  28. }
  29. ],
  30. 'extra' => {
  31. 'arg_line' => ' beginifset {}
  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. 'args' => [
  58. {
  59. 'parent' => {},
  60. 'text' => 'endifset',
  61. 'type' => 'macro_name'
  62. }
  63. ],
  64. 'cmdname' => 'macro',
  65. 'contents' => [
  66. {
  67. 'parent' => {},
  68. 'text' => '@end ifset',
  69. 'type' => 'raw'
  70. },
  71. {
  72. 'parent' => {},
  73. 'text' => '
  74. ',
  75. 'type' => 'last_raw_newline'
  76. }
  77. ],
  78. 'extra' => {
  79. 'arg_line' => ' endifset {}
  80. '
  81. },
  82. 'line_nr' => {
  83. 'file_name' => '',
  84. 'line_nr' => 5,
  85. 'macro' => ''
  86. },
  87. 'parent' => {}
  88. },
  89. {
  90. 'extra' => {
  91. 'command' => {}
  92. },
  93. 'parent' => {},
  94. 'text' => '
  95. ',
  96. 'type' => 'empty_line_after_command'
  97. },
  98. {
  99. 'parent' => {},
  100. 'text' => '
  101. ',
  102. 'type' => 'empty_line'
  103. }
  104. ],
  105. 'type' => 'text_root'
  106. };
  107. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0];
  108. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0];
  109. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0];
  110. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  111. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[1]{'extra'}{'command'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[0];
  112. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[1]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  113. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[2]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  114. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3]{'args'}[0]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3];
  115. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3]{'contents'}[0]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3];
  116. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3]{'contents'}[1]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3];
  117. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  118. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[4]{'extra'}{'command'} = $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[3];
  119. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[4]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  120. $result_trees{'ifset_and_end_isef_in_macro'}{'contents'}[5]{'parent'} = $result_trees{'ifset_and_end_isef_in_macro'};
  121. $result_texis{'ifset_and_end_isef_in_macro'} = '@macro beginifset {}
  122. @ifset a
  123. @end macro
  124. @macro endifset {}
  125. @end ifset
  126. @end macro
  127. ';
  128. $result_texts{'ifset_and_end_isef_in_macro'} = '
  129. ';
  130. $result_errors{'ifset_and_end_isef_in_macro'} = [
  131. {
  132. 'error_line' => ':11: no matching `@end ifset\'
  133. ',
  134. 'file_name' => '',
  135. 'line_nr' => 11,
  136. 'macro' => '',
  137. 'text' => 'no matching `@end ifset\'',
  138. 'type' => 'error'
  139. }
  140. ];
  141. 1;