|
|
1.1 ! root 1: /* ! 2: * operations ! 3: * those operations which are set to the right ! 4: * are not actually generated by pi, ! 5: * but are included so they can be checked for (e.g. in pcc.c). ! 6: * those operation which are not assigned are set in comments. ! 7: */ ! 8: #define O_ABORT 00 ! 9: #define O_HALT 01 ! 10: #define O_TRA4 02 ! 11: #define O_NODUMP 03 ! 12: #define O_BEG 04 ! 13: #define O_END 05 ! 14: #define O_CALL 06 ! 15: #define O_TRACNT 07 ! 16: #define O_PUSH 010 ! 17: #define O_POP 011 ! 18: #define O_INX4 012 ! 19: #define O_SDUP 013 ! 20: #define O_IF 014 ! 21: #define O_TRA 015 ! 22: #define O_LINO 016 ! 23: #define O_GOTO 017 ! 24: #define O_REL2 020 ! 25: #define O_REL4 021 ! 26: #define O_REL24 022 ! 27: #define O_REL42 023 ! 28: #define O_REL8 024 ! 29: #define O_RELG 025 ! 30: #define O_RELT 026 ! 31: #define O_NULL 027 ! 32: #define O_REL28 030 ! 33: #define O_REL48 031 ! 34: #define O_REL82 032 ! 35: #define O_REL84 033 ! 36: #define O_AND 034 ! 37: #define O_OR 035 ! 38: #define O_NOT 036 ! 39: /* 037 */ ! 40: #define O_AS2 040 ! 41: #define O_AS4 041 ! 42: #define O_AS24 042 ! 43: #define O_AS42 043 ! 44: #define O_AS8 044 ! 45: #define O_INX2P2 045 ! 46: #define O_INX4P2 046 ! 47: #define O_AS 047 ! 48: #define O_AS21 050 ! 49: #define O_AS41 051 ! 50: #define O_AS28 052 ! 51: #define O_AS48 053 ! 52: #define O_OFF 054 ! 53: #define O_INX2 055 ! 54: #define O_NIL 056 ! 55: #define O_LV 057 ! 56: #define O_ADD2 060 ! 57: #define O_ADD4 061 ! 58: #define O_ADD24 062 ! 59: #define O_ADD42 063 ! 60: #define O_ADD28 064 ! 61: #define O_ADD48 065 ! 62: #define O_ADD82 066 ! 63: #define O_ADD84 067 ! 64: #define O_SUB2 070 ! 65: #define O_SUB4 071 ! 66: #define O_SUB24 072 ! 67: #define O_SUB42 073 ! 68: #define O_SUB28 074 ! 69: #define O_SUB48 075 ! 70: #define O_SUB82 076 ! 71: #define O_SUB84 077 ! 72: #define O_MUL2 0100 ! 73: #define O_MUL4 0101 ! 74: #define O_MUL24 0102 ! 75: #define O_MUL42 0103 ! 76: #define O_MUL28 0104 ! 77: #define O_MUL48 0105 ! 78: #define O_MUL82 0106 ! 79: #define O_MUL84 0107 ! 80: #define O_ABS2 0110 ! 81: #define O_ABS4 0111 ! 82: #define O_ABS8 0112 ! 83: /* 0113 */ ! 84: #define O_ADD8 0114 ! 85: #define O_SUB8 0115 ! 86: #define O_MUL8 0116 ! 87: #define O_DVD8 0117 ! 88: #define O_DIV2 0120 ! 89: #define O_DIV4 0121 ! 90: #define O_DIV24 0122 ! 91: #define O_DIV42 0123 ! 92: /* 0124 */ ! 93: /* 0125 */ ! 94: /* 0126 */ ! 95: /* 0127 */ ! 96: #define O_MOD2 0130 ! 97: #define O_MOD4 0131 ! 98: #define O_MOD24 0132 ! 99: #define O_MOD42 0133 ! 100: /* 0134 */ ! 101: /* 0135 */ ! 102: /* 0136 */ ! 103: /* 0137 */ ! 104: #define O_NEG2 0140 ! 105: #define O_NEG4 0141 ! 106: #define O_NEG8 0142 ! 107: /* 0143 */ ! 108: /* 0144 */ ! 109: /* 0145 */ ! 110: /* 0146 */ ! 111: /* 0147 */ ! 112: /* 0150 */ ! 113: /* 0151 */ ! 114: /* 0152 */ ! 115: /* 0153 */ ! 116: /* 0154 */ ! 117: /* 0155 */ ! 118: /* 0156 */ ! 119: /* 0157 */ ! 120: #define O_DVD2 0160 ! 121: #define O_DVD4 0161 ! 122: #define O_DVD24 0162 ! 123: #define O_DVD42 0163 ! 124: #define O_DVD28 0164 ! 125: #define O_DVD48 0165 ! 126: #define O_DVD82 0166 ! 127: #define O_DVD84 0167 ! 128: #define O_RV1 0170 ! 129: #define O_RV2 0171 ! 130: #define O_RV4 0172 ! 131: #define O_RV8 0173 ! 132: #define O_IND1 0174 ! 133: #define O_IND2 0175 ! 134: #define O_IND4 0176 /* pbk */ ! 135: #define O_IND8 0177 ! 136: #define O_CON1 0200 ! 137: #define O_CON2 0201 ! 138: #define O_CON4 0202 ! 139: #define O_CON8 0203 ! 140: #define O_RV 0204 ! 141: #define O_IND 0205 ! 142: #define O_CON 0206 ! 143: /* 0207 */ ! 144: #define O_RANG2 0210 ! 145: #define O_RANG42 0211 ! 146: #define O_RSNG2 0212 ! 147: #define O_RSNG42 0213 ! 148: #define O_RANG4 0214 ! 149: #define O_RANG24 0215 ! 150: #define O_RSNG4 0216 ! 151: #define O_RSNG24 0217 ! 152: /* 0220 */ ! 153: /* 0221 */ ! 154: /* 0222 */ ! 155: /* 0223 */ ! 156: /* 0224 */ ! 157: /* 0225 */ ! 158: /* 0226 */ ! 159: /* 0227 */ ! 160: #define O_CONC 0230 ! 161: #define O_CASEBEG 0231 ! 162: #define O_CASE1 0232 ! 163: #define O_CASE2 0233 ! 164: #define O_CASE4 0234 ! 165: #define O_CASEEND 0235 ! 166: #define O_CONG 0236 ! 167: #define O_ORD2 0237 ! 168: #define O_CASE1OP 0240 ! 169: #define O_CASE2OP 0241 ! 170: #define O_CASE4OP 0242 ! 171: #define O_PXPBUF 0243 ! 172: #define O_COUNT 0244 ! 173: /* 0245 */ ! 174: /* 0246 */ ! 175: /* 0247 */ ! 176: #define O_ADDT 0250 ! 177: #define O_SUBT 0251 ! 178: #define O_MULT 0252 ! 179: #define O_INCT 0253 ! 180: #define O_CTTOT 0254 ! 181: #define O_CARD 0255 ! 182: #define O_IN 0256 ! 183: #define O_ASRT 0257 ! 184: #define O_FOR1U 0260 ! 185: #define O_FOR2U 0261 ! 186: #define O_FOR4U 0262 ! 187: #define O_FOR1D 0263 ! 188: #define O_FOR2D 0264 ! 189: #define O_FOR4D 0265 ! 190: #define O_STLIM 0266 ! 191: #define O_SCLCK 0267 ! 192: #define O_STOI 0270 ! 193: #define O_STOD 0271 ! 194: #define O_ITOD 0272 ! 195: #define O_ITOS 0273 ! 196: #define O_BUFF 0274 ! 197: #define O_WCLCK 0275 ! 198: #define O_WRHEX2 0276 ! 199: #define O_WRHEX4 0277 ! 200: #define O_GET 0300 ! 201: #define O_PUT 0301 ! 202: #define O_MESSAGE 0302 ! 203: #define O_FNIL 0303 ! 204: #define O_EOF 0304 ! 205: #define O_EOLN 0305 ! 206: #define O_RESET 0306 ! 207: #define O_REWRITE 0307 ! 208: #define O_REMOVE 0310 ! 209: #define O_READ4 0311 ! 210: #define O_UNIT 0312 ! 211: #define O_READC 0313 ! 212: #define O_READ8 0314 ! 213: #define O_UNITINP 0315 ! 214: #define O_UNITOUT 0316 ! 215: #define O_READLN 0317 ! 216: #define O_WRIT2 0320 ! 217: #define O_WRIT4 0321 ! 218: #define O_WRITB 0322 ! 219: #define O_WRITC 0323 ! 220: #define O_WRIT8 0324 ! 221: #define O_WRITG 0325 ! 222: #define O_WRIT82 0326 ! 223: #define O_WRITLN 0327 ! 224: #define O_WROCT2 0330 ! 225: #define O_WROCT4 0331 ! 226: #define O_FLUSH 0332 ! 227: #define O_PACK 0333 ! 228: #define O_UNPACK 0334 ! 229: #define O_LLIMIT 0335 ! 230: #define O_ARGC 0336 ! 231: #define O_ARGV 0337 ! 232: #define O_CLCK 0340 ! 233: #define O_SEED 0341 ! 234: #define O_RANDOM 0342 ! 235: #define O_DISPOSE 0343 ! 236: #define O_NEW 0344 ! 237: #define O_EXPO 0345 ! 238: #define O_DATE 0346 ! 239: #define O_TIME 0347 ! 240: #define O_ATAN 0350 ! 241: #define O_COS 0351 ! 242: #define O_EXP 0352 ! 243: #define O_LN 0353 ! 244: #define O_SIN 0354 ! 245: #define O_SQRT 0355 ! 246: #define O_CHR2 0356 ! 247: #define O_CHR4 0357 ! 248: #define O_ODD2 0360 ! 249: #define O_ODD4 0361 ! 250: #define O_PRED2 0362 ! 251: #define O_PRED4 0363 ! 252: #define O_PRED24 0364 ! 253: #define O_SUCC2 0365 ! 254: #define O_SUCC4 0366 ! 255: #define O_SUCC24 0367 ! 256: #define O_DEFNAME 0370 ! 257: #define O_PAGE 0371 ! 258: #define O_UNDEF 0372 ! 259: #define O_SQR2 0373 ! 260: #define O_SQR4 0374 ! 261: #define O_SQR8 0375 ! 262: #define O_ROUND 0376 ! 263: #define O_TRUNC 0377
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.