/ / These defines make the binary output of the / assembler match the original binary tape. / LISTIN=3 PROG=7 EVER2=40 EVEVAL=41 FREE=42 EVFREE=42 EVBEG=43 EVLEN=44 EVOUT=45 EVIN=46 PUSH=47 POP=50 EV=51 TEST=52 CVBIN=53 CVDEC=54 CNLIST=55 LILIST=55 EQLIST=55 EVTABL=55 ACLST1=55 ACLST2=56 SHLIST=55 EVAL=JMS I EVEVAL HLT=JMS I EVER2 MQA=7501 MQL=7421 MUL=7405 DIV=7407 SHL=7413 SL1=7541 LSR=7417 ICF=6342 EFC=6324 *LISP-0200