out_of_multitable.pl 2.5 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384
  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{'out_of_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. 'parent' => {},
  22. 'text' => '0.6 0.4 aaa'
  23. }
  24. ],
  25. 'parent' => {},
  26. 'type' => 'misc_line_arg'
  27. }
  28. ],
  29. 'cmdname' => 'columnfractions',
  30. 'extra' => {
  31. 'misc_args' => [
  32. '0.6',
  33. '0.4'
  34. ],
  35. 'spaces_after_command' => {}
  36. },
  37. 'line_nr' => {
  38. 'file_name' => '',
  39. 'line_nr' => 1,
  40. 'macro' => ''
  41. },
  42. 'parent' => {}
  43. }
  44. ],
  45. 'type' => 'text_root'
  46. };
  47. $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'out_of_multitable'}{'contents'}[0];
  48. $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0];
  49. $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0];
  50. $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'out_of_multitable'}{'contents'}[0];
  51. $result_trees{'out_of_multitable'}{'contents'}[0]{'extra'}{'spaces_after_command'} = $result_trees{'out_of_multitable'}{'contents'}[0]{'args'}[0]{'contents'}[0];
  52. $result_trees{'out_of_multitable'}{'contents'}[0]{'parent'} = $result_trees{'out_of_multitable'};
  53. $result_texis{'out_of_multitable'} = '@columnfractions 0.6 0.4 aaa';
  54. $result_texts{'out_of_multitable'} = '';
  55. $result_errors{'out_of_multitable'} = [
  56. {
  57. 'error_line' => ':1: column fraction not a number: aaa
  58. ',
  59. 'file_name' => '',
  60. 'line_nr' => 1,
  61. 'macro' => '',
  62. 'text' => 'column fraction not a number: aaa',
  63. 'type' => 'error'
  64. },
  65. {
  66. 'error_line' => ':1: @columnfractions only meaningful on a @multitable line
  67. ',
  68. 'file_name' => '',
  69. 'line_nr' => 1,
  70. 'macro' => '',
  71. 'text' => '@columnfractions only meaningful on a @multitable line',
  72. 'type' => 'error'
  73. }
  74. ];
  75. 1;