{ OPTABLE }
op tiger lion DOL DOR
000 X X X X -X-
001 X X X X CAR
002 X X X X CDR
003 X X X X LISTP
004 X X X X NTYPX
005 X X X X TYPEP
006 X X X X DTEST {new COERCE}
007 - - - - CDDR {unused}
010 X X X X FN0
011 X X X X FN1
012 X X X X FN2
013 X X X X FN3
014 X X X X FN4
015 X X X X FNX
016 X X X X APPLYFN
017 - - - - CHECKAPPLY{?}
020 X X X X RETURN
021 X X X X BIND
022 X X X X UNBIND
023 X X X X DUNBIND
024 X X X X RPLPTR.N
025 X X X X GCREF
026 X - - - ASSOC
027 X X X X GVAR←
030 X - X X RPLACA
031 X - X X RPLACD
032 X X X X CONS
033 - - - - {unused}{will be GETPROP}
034 X - - - FMEMB
035 - - - - {unused}{will be GETHASH}
036 - - - - {unused}{will be PUTHASH}
037 X - X X CREATECELL
040 X - X X BIN
041 - - - - BOUT {unused}
042 P - - - {Prolog}PROLOGOPFETCHPLUSOPDISP
043 - - - - {unused}{will be LIST1 = (CONS X NIL)}
044 - - - - DOCOLLECT {unused}
045 - - - - ENDCOLLECT {unused}
046 X - X - RPLCONS
047 X - - - LISTGET
050 - - - - ELT
051 - - - - NTHCHC
052 - - - - SETA
053 - - - - RPLCHARCODE {unused}
054 X X X X EVAL
055 - - - - {unused}EVALV
056 X X - - TYPECHECK
057 X X X ? STKSCAN
060 X - - - BUSBLT
061 X - - - MISC8{IBLT1 and IBLT2}
062 X - - - POLY {Polynomial Evaluation; Matrix Multiply}
063 X X - - TYPEMASK.N
064 P - - - {Prolog}PROLOGREADPTR
065 P - - - {Prolog}PROLOGREADTAG
066 P - - - {Prolog}PROLOGWRITETAGPTR
067 P - - - {Prolog}PROLOGWRITE0PTR
070 X - - - PSEUDOCOLOR
071 - - - - {unused}
072 X X - - EQL
073 X - - - DRAWLINE
074 X X ? ? STOREN
075 X X - - COPYN
076 X X X X RAID
077 - - - - {unused}RETURN FOR LLBREAK
100 X X X X IVAR0
101 X X X X IVAR1
102 X X X X IVAR2
103 X X X X IVAR3
104 X X X X IVAR4
105 X X X X IVAR5
106 X X X X IVAR6
107 X X X X IVARX
110 X X X X PVAR0
111 X X X X PVAR1
112 X X X X PVAR2
113 X X X X PVAR3
114 X X X X PVAR4
115 X X X X PVAR5
116 X X X X PVAR6
117 X X X X PVARX
120 X X X X FVAR0
121 X X X X FVAR1
122 X X X X FVAR2
123 X X X X FVAR3
124 X X X X FVAR4
125 X X X X FVAR5
126 X X X X FVAR6
127 X X X X FVARX
130 X X X X PVAR0←
131 X X X X PVAR1←
132 X X X X PVAR2←
133 X X X X PVAR3←
134 X X X X PVAR4←
135 X X X X PVAR5←
136 X X X X PVAR6←
137 X X X X PVARX←
140 X X X X GVAR
141 - - - - ARG0
142 X X X X IVARX←
143 X X X X FVARX←
144 X X X X COPY
145 - - - X MYARGCOUNT {unused}
146 X X X X MYALINK
147 X X X X ACONST
150 X X X X 'NIL
151 X X X X 'T
152 X X X X '0
153 X X X X '1
154 X X X X SIC
155 X X X X SNIC
156 X X X X SICX
157 X X X X GCONST
160 X X X X ATOMNUMBER
161 X X X X READFLAGS
162 X X X X READRP
163 X X X ? WRITEMAP
164 X - X ? READPRINTERPORT
165 X - X ? WRITEPRINTERPORT
166 X X X X PILOTBITBLT
167 X X X X RCLK
170 X X X X MISC1
171 X X X X MISC2
172 X X X X RECLAIMCELL
173 X X X X GCSCAN1
174 X X X X GCSCAN2
175 X X X X SUBRCALL
176 X X X X CONTEXT
177 - - ? - {unused}AUDIO
200 X X X X JUMP00
201 X X X X JUMP01
202 X X X X JUMP02
203 X X X X JUMP03
204 X X X X JUMP04
205 X X X X JUMP05
206 X X X X JUMP06
207 X X X X JUMP07
210 X X X X JUMP10
211 X X X X JUMP11
212 X X X X JUMP12
213 X X X X JUMP13
214 X X X X JUMP14
215 X X X X JUMP15
216 X X X X JUMP16
217 X X X X JUMP17
220 X X X X FJUMP00
221 X X X X FJUMP01
222 X X X X FJUMP02
223 X X X X FJUMP03
224 X X X X FJUMP04
225 X X X X FJUMP05
226 X X X X FJUMP06
227 X X X X FJUMP07
230 X X X X FJUMP10←
231 X X X X FJUMP11←
232 X X X X FJUMP12←
233 X X X X FJUMP13←
234 X X X X FJUMP14←
235 X X X X FJUMP15←
236 X X X X FJUMP16←
237 X X X X FJUMP17←
240 X X X X TJUMP00
241 X X X X TJUMP01
242 X X X X TJUMP02
243 X X X X TJUMP03
244 X X X X TJUMP04
245 X X X X TJUMP05
246 X X X X TJUMP06
247 X X X X TJUMP07
250 X X X X TJUMP10
251 X X X X TJUMP11
252 X X X X TJUMP12
253 X X X X TJUMP13
254 X X X X TJUMP14
255 X X X X TJUMP15
256 X X X X TJUMP16
257 X X X X TJUMP17
260 X X X X JUMPX
261 X X X X JUMPXX
262 X X X X FJUMPX
263 X X X X TJUMPX
264 X X X X NFJUMPX
265 X X X X NTJUMPX
266 - - - - {unused}
267 - - - - {unused}
270 X X X X PVAR0←
271 X X X X PVAR1←
272 X X X X PVAR2←
273 X X X X PVAR3←
274 X X X X PVAR4←
275 X X X X PVAR5←
276 X X X X PVAR6←
277 X X X X POP
300 X X - - POP.N
301 X X - - ATOMCELL.N
302 X X X X GETBASEBYTE
303 - - - - {unused}
304 X X X X BLT
305 X - - - PIXELBLT
306 - - - - {unused}
307 X X X X PUTBASEBYTE
310 X X X X GETBASE.N
311 X X X X GETBASEPTR.N
312 X X X X GETBITS.N.FD
313 - - - - {unused}{new GETBASEFIXP}
314 - - - - {unused}{new PUTBASEFIXP}
315 X X X X PUTBASE.N
316 X X X X PUTBASEPTR.N
317 X X X X PUTBITS.N.FD
320 X X X X ADDBASE
321 X X X X VAG2
322 X X X X HILOC
323 X X X X LOLOC
324 X X X X PLUS2{see notes}
325 X X X X DIFFERENCE{see notes}
326 X X X X TIMES2{see notes}
327 X X X X QUOTIENT{see notes}
330 X X X X IPLUS2{see notes}
331 X X X X IDIFFERENCE{see notes}
332 X X X X ITIMES2{see notes}
333 X X X X IQUOTIENT{see notes}
334 X X X X IREMAINDER{see notes}
335 - - - - {unused}{IPLUS.N}
336 - - - - {unused}{IDIFFERENCE.N}
337 - - - - {unused}
340 X X X X LLSH1{see notes}
341 X X X X LLSH8{see notes}
342 X X X X LRSH1{see notes}
343 X X X X LRSH8{see notes}
344 X X X X LOGOR2{see notes}
345 X X X X LOGAND2{see notes}
346 X X X X LOGXOR2{see notes}
347 - - - - {unused}{new ALSH}
350 X - X X FPLUS2
351 X - X X FDIFFERENCE
352 X - X X FTIMES2
353 X - X X FQUOTIENT
354 X - - - UBFLOAT2 {UFADD, UFSUB, UFISUB, UFMULT, UFDIV, UGREAT, UMAX, UMIN, new UREM}
355 X - - - UBFLOAT1 {UTOB, BTOU, UABS, UNEG, UFIX}
356 - - - - {unused}
357 - - - - {unused}
360 X X X X EQ
361 X X X X IGREATERP
362 X - X X FGREATERP
363 X X X X GREATERP
364 X X ? ? EQUAL
365 X - X X MAKENUMBER
366 X - X X BOXIPLUS
367 X - X X BOXIDIFFERENCE
370 - - - - MISC5
371 X - - - FFTSTEP
372 X - - - MISC3 {Floating Point Array ops: EXP, MAG, FLOAT, COMPLEX, BLKMAX, BLKMIN, BLKABSMAX, BLKABSMIN, FLOATTOBYTE}
373 X - - - MISC4 {Floating Point Array ops: TIMES, PERM, PLUS, DIFFERENCE, MAGIC, BITMAPBIT}
374 - - ? - {reserved for DOLPHIN}
375 X X X X SWAP
376 X X X X NOP
377 - - - - {unused}
notes:
4K microcode
PLUS2, DIFFERENCE, TIMES2, QUOTIENT will ufn if args not INTEGERS
IPLUS2, IDIFFERENCE will accept FIXP's as arguments, but will ufn if result is not a smallp or smallneg
ITIMES2, IQUOTIENT, IREMAINDER will ufn if both args are not smallp
12K microcode
PLUS2, DIFFERENCE, TIMES2, QUOTIENT will try floating point if args not INTEGERS
IPLUS2, IDIFFERENCE will accept FIXP's as arguments, and box the result if it is not a smallp or smallneg
ITIMES2, IQUOTIENT, IREMAINDER will ufn if both args are not smallp