home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Tex / Tex29 / StTeXsrc.zoo / src / scan.h < prev    next >
Text File  |  1988-03-13  |  2KB  |  70 lines
  1.  
  2. /*
  3.  * @(#)scan.h 2.5 EPA
  4.  *
  5.  * Copyright 1987,1988 Pat J Monardo
  6.  *
  7.  * Redistribution of this file is permitted through
  8.  * the specifications in the file COPYING.
  9.  *
  10.  * 
  11.  */
  12.  
  13. int     scan_left_brace();
  14. int     scan_optional_equals();
  15. bool    scan_keyword();
  16.  
  17. global  val     cur_val;
  18. global  int     cur_val_level;
  19.  
  20. int     scan_something_internal();
  21.  
  22. #define INT_VAL         0
  23. #define DIMEN_VAL       1
  24. #define GLUE_VAL        2
  25. #define MU_VAL          3
  26. #define IDENT_VAL       4
  27. #define TOK_VAL         5
  28.  
  29. int     scan_eight_bit_int();
  30. int     scan_seven_bit_int();
  31. int     scan_four_bit_int();
  32. int     scan_char_num();
  33. int     scan_fifteen_bit_int();
  34. int     scan_twenty_seven_bit_int();
  35.  
  36. int     scan_int();
  37. #define INFINITY    017777777777
  38.  
  39. global  int     radix;
  40.  
  41. #define PLUS_TOKEN          (OTHER_TOKEN + '+')
  42. #define MINUS_TOKEN         (OTHER_TOKEN + '-')
  43. #define ZERO_TOKEN          (OTHER_TOKEN + '0')
  44. #define A_TOKEN             (LETTER_TOKEN + 'A')
  45. #define OTHER_A_TOKEN       (OTHER_TOKEN + 'A')
  46. #define OCTAL_TOKEN         (OTHER_TOKEN + '\'')
  47. #define HEX_TOKEN           (OTHER_TOKEN + '"')
  48. #define ALPHA_TOKEN         (OTHER_TOKEN + '`')
  49. #define POINT_TOKEN         (OTHER_TOKEN + '.')
  50. #define EURO_POINT_TOKEN    (OTHER_TOKEN + ',')
  51.  
  52. int     scan_dimen();
  53. #define MAX_DIMEN   07777777777
  54.  
  55. #define scan_normal_dimen()     scan_dimen(FALSE, FALSE, FALSE)
  56.  
  57. global  gord    cur_order;
  58. int     scan_glue();
  59.  
  60. #define scan_optional_space() \
  61.     {get_x_token(); if (cur_cmd != SPACER) back_input();}
  62.  
  63. #define get_nbx_token() \
  64.     {do get_x_token(); while (cur_cmd == SPACER);}
  65.  
  66. #define get_nbrx_token() \
  67.     {do get_x_token(); while (cur_cmd == SPACER || cur_cmd == RELAX);}
  68.  
  69. ptr     scan_rule_spec();
  70.