|
|
1.1 ! root 1: /* ! 2: * Sydney C Compiler. ! 3: * ! 4: * Copyright 1984, Bruce Ellis. ! 5: * ! 6: * Unauthorised possesion, sale or use prohibited. ! 7: */ ! 8: ! 9: /* ! 10: * Note. Any modification to this enum should be matched by an equivalent ! 11: * entry in "sutab.c" and a string in "debug.c" ! 12: */ ! 13: typedef enum ! 14: { ! 15: xt_and, ! 16: xt_andand, ! 17: xt_andeq, ! 18: xt_argident, ! 19: xt_argname, ! 20: xt_arrayof, ! 21: xt_bar, ! 22: xt_barbar, ! 23: xt_bareq, ! 24: xt_basetype, ! 25: xt_bitfield, ! 26: xt_block, ! 27: xt_caddr, ! 28: xt_call, ! 29: xt_cast, ! 30: xt_cchar, ! 31: xt_cdouble, ! 32: xt_cfloat, ! 33: xt_cint, ! 34: xt_class, ! 35: xt_clong, ! 36: xt_cnull, ! 37: xt_colon, ! 38: xt_comma, ! 39: xt_cuint, ! 40: xt_culong, ! 41: xt_do, ! 42: xt_dot, ! 43: xt_enum, ! 44: xt_eq, ! 45: xt_eqeq, ! 46: xt_expr, ! 47: xt_extf, ! 48: xt_ftnreturning, ! 49: xt_grgreq, ! 50: xt_grt, ! 51: xt_grteq, ! 52: xt_grtgrt, ! 53: xt_if, ! 54: xt_insf, ! 55: xt_less, ! 56: xt_lesseq, ! 57: xt_lessless, ! 58: xt_literal, ! 59: xt_lslseq, ! 60: xt_maxof, ! 61: xt_memblist, ! 62: xt_minof, ! 63: xt_minus, ! 64: xt_minuseq, ! 65: xt_name, ! 66: xt_not, ! 67: xt_noteq, ! 68: xt_null, ! 69: xt_obj, ! 70: xt_percent, ! 71: xt_pereq, ! 72: xt_plus, ! 73: xt_pluseq, ! 74: xt_postdec, ! 75: xt_postinc, ! 76: xt_predec, ! 77: xt_preinc, ! 78: xt_ptrdiff, ! 79: xt_ptrminus, ! 80: xt_ptrminuseq, ! 81: xt_ptrplus, ! 82: xt_ptrpluseq, ! 83: xt_ptrpostdec, ! 84: xt_ptrpostinc, ! 85: xt_ptrpredec, ! 86: xt_ptrpreinc, ! 87: xt_ptrto, ! 88: xt_question, ! 89: xt_sizeof, ! 90: xt_slash, ! 91: xt_slasheq, ! 92: xt_sref, ! 93: xt_string, ! 94: xt_structof, ! 95: xt_svalue, ! 96: xt_tilda, ! 97: xt_times, ! 98: xt_timeseq, ! 99: xt_uand, ! 100: xt_uminus, ! 101: xt_unionof, ! 102: xt_uparrow, ! 103: xt_uparroweq, ! 104: xt_utimes, ! 105: xt_while, ! 106: } ! 107: xnodes; ! 108: ! 109: #define SAMESU 1 ! 110: #define MAXSU 255 ! 111: ! 112: typedef enum ! 113: { ! 114: su_arrayof, ! 115: su_basetype, ! 116: su_bitfield, ! 117: su_enum, ! 118: su_ftnreturning, ! 119: su_ptrto, ! 120: su_structof, ! 121: su_unionof, ! 122: su_types, ! 123: ! 124: su_null, ! 125: ! 126: su_and, ! 127: su_bar, ! 128: su_plus, ! 129: su_times, ! 130: su_uparrow, ! 131: } ! 132: suequivs; ! 133: ! 134: typedef struct ! 135: { ! 136: char *xd_name; ! 137: pack_t xd_suequiv; ! 138: } ! 139: xdopes; ! 140: ! 141: #define xunpack(t) ((xnodes)(t)) ! 142: #define sunpack(t) ((suequivs)(t)) ! 143: ! 144: extern xdopes xdope[]; ! 145: extern uchar sutab[];
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.