defindex_too_much_args.pl 2.3 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071
  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{'defindex_too_much_args'} = {
  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' => 'chose machin'
  23. }
  24. ],
  25. 'parent' => {},
  26. 'type' => 'misc_line_arg'
  27. }
  28. ],
  29. 'cmdname' => 'defindex',
  30. 'extra' => {
  31. 'spaces_after_command' => {}
  32. },
  33. 'line_nr' => {
  34. 'file_name' => '',
  35. 'line_nr' => 1,
  36. 'macro' => ''
  37. },
  38. 'parent' => {}
  39. }
  40. ],
  41. 'type' => 'text_root'
  42. };
  43. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'extra'}{'command'} = $result_trees{'defindex_too_much_args'}{'contents'}[0];
  44. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0]{'contents'}[0]{'parent'} = $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0];
  45. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0]{'contents'}[1]{'parent'} = $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0];
  46. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0]{'parent'} = $result_trees{'defindex_too_much_args'}{'contents'}[0];
  47. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'extra'}{'spaces_after_command'} = $result_trees{'defindex_too_much_args'}{'contents'}[0]{'args'}[0]{'contents'}[0];
  48. $result_trees{'defindex_too_much_args'}{'contents'}[0]{'parent'} = $result_trees{'defindex_too_much_args'};
  49. $result_texis{'defindex_too_much_args'} = '@defindex chose machin';
  50. $result_texts{'defindex_too_much_args'} = '';
  51. $result_errors{'defindex_too_much_args'} = [
  52. {
  53. 'error_line' => ':1: bad argument to @defindex: chose machin
  54. ',
  55. 'file_name' => '',
  56. 'line_nr' => 1,
  57. 'macro' => '',
  58. 'text' => 'bad argument to @defindex: chose machin',
  59. 'type' => 'error'
  60. }
  61. ];
  62. 1;