home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / P2C.ZIP / KTYPES.H < prev    next >
Encoding:
C/C++ Source or Header  |  1987-03-27  |  1.4 KB  |  38 lines
  1. /*--- ktypes.h ------------------------------------------------------
  2. Keyword types for the Pascal to C translator.
  3. 3/25/87 Daniel Kegel (seismo!rochester!srs!dan)
  4. ---------------------------------------------------------------------*/
  5. #define T_ZIP        0    /* Nondescript identifier */
  6. #define T_BEGIN        1    /* BEGIN */
  7. #define T_END        2    /* END */
  8. #define T_PROC        3    /* PROCEDURE */
  9. #define T_FUNC        4    /* FUNCTION */
  10. #define T_FORWARD    5    /* FORWARD */
  11. #define T_CONST     6    /* CONST */
  12. #define T_VAR         7    /* VAR */
  13. #define T_COMPARE    8    /* ==, <>, >, < */
  14. #define T_EQUALS    9    /* = alone; in CONST, TYPE or comparison */
  15. #define T_COLON     10    /* : alone; in VAR, READ, or WRITE */
  16. #define T_SEMI        11    /* ; alone */
  17. #define T_LPAREN    12    /* ( alone */
  18. #define T_RPAREN    13    /* ) alone */
  19. #define T_SPACE     14    /* a string of blanks, tabs, and/or newlines */
  20. #define T_STRUCTMEMBER    15    /* ^. */
  21. #define T_ASSIGN    16    /* := */
  22. #define T_STRING    17    /* quoted string */
  23. #define T_COMMENT    18    /* comment text */
  24. #define T_EOF        19    /* end of source file */
  25. #define T_COMMA        20    /* , */
  26. #define T_LABEL        21    /* LABEL */
  27. #define T_DEREF        22    /* ^ alone */
  28. #define T_LBRACKET    23    /* [ */
  29. #define T_RBRACKET    24    /* ] */
  30. #define T_ARRAY        25    /* ARRAY */
  31. #define T_RANGE        26    /* .. */
  32. #define T_OF        27    /* OF */
  33. #define T_RECORD    28    /* RECORD */
  34. #define T_FILE        29    /* FILE */
  35. #define T_TYPE        30    /* TYPE */
  36. #define T_STRINGTYPE    31    /* STRING(n) or STRING[n] type */
  37. #define T_CASE        32    /* CASE */
  38.