macro_in_ifset.pl 2.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283848586878889
  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_ifset'} = {
  7. 'contents' => [
  8. {
  9. 'args' => [
  10. {
  11. 'parent' => {},
  12. 'text' => 'macroone',
  13. 'type' => 'macro_name'
  14. },
  15. {
  16. 'parent' => {},
  17. 'text' => 'arg',
  18. 'type' => 'macro_arg'
  19. }
  20. ],
  21. 'cmdname' => 'macro',
  22. 'contents' => [
  23. {
  24. 'parent' => {},
  25. 'text' => '@end ifset',
  26. 'type' => 'raw'
  27. },
  28. {
  29. 'parent' => {},
  30. 'text' => '
  31. ',
  32. 'type' => 'last_raw_newline'
  33. }
  34. ],
  35. 'extra' => {
  36. 'arg_line' => ' macroone {arg}
  37. '
  38. },
  39. 'line_nr' => {
  40. 'file_name' => '',
  41. 'line_nr' => 1,
  42. 'macro' => ''
  43. },
  44. 'parent' => {}
  45. },
  46. {
  47. 'extra' => {
  48. 'command' => {}
  49. },
  50. 'parent' => {},
  51. 'text' => '
  52. ',
  53. 'type' => 'empty_line_after_command'
  54. },
  55. {
  56. 'parent' => {},
  57. 'text' => '
  58. ',
  59. 'type' => 'empty_line'
  60. }
  61. ],
  62. 'type' => 'text_root'
  63. };
  64. $result_trees{'macro_in_ifset'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'macro_in_ifset'}{'contents'}[0];
  65. $result_trees{'macro_in_ifset'}{'contents'}[0]{'args'}[1]{'parent'} = $result_trees{'macro_in_ifset'}{'contents'}[0];
  66. $result_trees{'macro_in_ifset'}{'contents'}[0]{'contents'}[0]{'parent'} = $result_trees{'macro_in_ifset'}{'contents'}[0];
  67. $result_trees{'macro_in_ifset'}{'contents'}[0]{'contents'}[1]{'parent'} = $result_trees{'macro_in_ifset'}{'contents'}[0];
  68. $result_trees{'macro_in_ifset'}{'contents'}[0]{'parent'} = $result_trees{'macro_in_ifset'};
  69. $result_trees{'macro_in_ifset'}{'contents'}[1]{'extra'}{'command'} = $result_trees{'macro_in_ifset'}{'contents'}[0];
  70. $result_trees{'macro_in_ifset'}{'contents'}[1]{'parent'} = $result_trees{'macro_in_ifset'};
  71. $result_trees{'macro_in_ifset'}{'contents'}[2]{'parent'} = $result_trees{'macro_in_ifset'};
  72. $result_texis{'macro_in_ifset'} = '@macro macroone {arg}
  73. @end ifset
  74. @end macro
  75. ';
  76. $result_texts{'macro_in_ifset'} = '
  77. ';
  78. $result_errors{'macro_in_ifset'} = [];
  79. 1;