:Title[LIFU.mc]; * * Edit History * March 22, 1985, Masinter, move around some opcodes * January 25, 1985 12:08 AM, Masinter, move UBFLOAT1, UBFLOAT2 to LLFLOAT * January 18, 1985 6:00 PM, Masinter, remove 56 for TYPEMASK * January 17, 1985 11:32 PM, Masinter, use STORE.N and COPY.N * resolve with \OPCODES * March 5, 1984 7:14 PM, JonL, Retracted 373; deleted 170 for use * February 18, 1984 3:50 PM, JonL, remove 373 for use as RWMufMan * January 4, 1984 10:42 PM, JonL, returned opcodes 354-357 and 364 * to the unused pool * December 29, 1983 3:43 PM, JonL, give up 313 as "experimental * GETBASE32N", and add code for MAKENUMBER * December 9, 1983 12:06 PM, JonL, added code for ARG0 (opcode 141) * November 9, 1983 --:-- , JonL and Masinter, added MYARGCOUNT InsSet[LispInsSet, 1]; *-------------------------------------------------------------------- * misc IFU definitions, including unallocated instructions * new opcode numbers *-------------------------------------------------------------------- UfnOps[0]; * compiler error UfnOps[7]; * CDDR UfnOps[26]; * ASSOC UfnOps[33]; * GETPROP UfnOps[34]; * FMEMB UfnOps[35]; * GETHASH UfnOps[36]; * PUTHASH UfnOps[41]; * BOUT UfnOps[42]; * POPDISP (for prolog) UfnOps[43]; * LIST1 UfnOps[44]; * DOCOLLECT UfnOps[45]; * ENDCOLLECT UfnOps[46]; * RPLCONS UfnOps[47]; * LISTGET UfnOps[50]; * ELT UfnOps[51]; * NTHCHC UfnOps[52]; * SETA UfnOps[53]; * RPLCHARCODE UfnOps[55]; * EVALV UfnOps[60]; * BUSBLT (DLion) UfnOps[61]; * MISC8 UfnOps[62]; * UBFLOAT3 UfnOps[64]; * RDPROLOGPTR UfnOps[65]; * RDPROLOGTAG UfnOps[66]; * WRTPTR&TAG UfnOps[67]; * WRTPTR&0TAG UfnOps[70]; * MISC7 UfnOps[71]; * DOVEMISC UfnOps[73]; * DRAWLINE UfnOps[76]; * RAID UfnOps[77]; * \RETURN (used by LLBREAK) UfnOps[163]; * WRITEMAP UfnOps[171]; * MISC2 UfnOps[172]; * RECLAIMCELL UfnOps[177]; * was audio UfnOps[266]; * * jeq? UfnOps[267]; * * jlistp? ufnOps[300]; * POP.N ufnOps[301]; * ATOMCELL.N UfnOps[303]; * was SCANBASE ufnOps[305]; * MISC10 ufnOps[306]; * was PUTBASEPTR ufnOps[313]; * GETBASEFIXP.N UfnOps[314]; * PUTBASEFIXP.N UfnOps[335]; * IPLUS.N UfnOps[336]; * IDIFFERENCE.N UfnOps[337]; * was IBLT1 UfnOps[347]; * LSH UfnOps[356]; * unused UfnOps[357]; * unused UfnOps[370]; * FLOATBLT UfnOps[371]; * FFTSTEP UfnOps[372]; * MISC3 UfnOps[373]; * MISC4 UfnOps[377]; * unused