xerox NovaOps.mesa Oct77 free download

File name NovaOps.mesa_Oct77.pdf

novlloPS.mESA Z4-0CT-77 18:38:25 Page 1 --File: NovaOps.mesa --Last edited by Sandman on August 23, 1977 9:28 PM DIRECTORY Mopcodes: FROM "mopcodes", AltoFileDefs: FROM "altofiledefs": DEFINITIONS FROM Mopcodes, AltoF 11 eDefs: NovaOps: DEFINITIONS 8EGIN -- in the definitions below, Finish/Abort must be all NovaOpcode: TYPE = {Finish.Abort,OutLd,InLrl,Punt,JSR}; CleanupReason: TYPE = {Finish,Abort.OutLd,InLd.Save,Restore.Check.Restart}; Stop: MACHINE CODE [code: NovaOpcode] = INLINE [zSTOP]; Finish: NovaOpcode = 0; Abort: NovaOpcode = 1; Punt: NovaOpcode = 4; NovaOutLd: MACIiINE CODE [code: NovaOpcode. file: POINTER TO CFP. message: POINTER] RETURNS [[0 .. 2]] = INLINE [zSTOP]; OutLd: NovaOpcode = 2; -- return 0=> normal return; 1=> just InLd'ed; 2=> just booted NovaInLd: MACHINE CODE [code: NovaOpcode. file: POINTER TO CFP. message: POINTER] = INLINE [zSTOP]; InLd: NovaOpcode = 3; NovaJSR: MACHINE CODE [code: NovaOpcode, address: POINTER, arg: UNSPECIFIED] RETURNS [UNSPECIFIED] = INLINE [zSTOP]; JSR: NovaOpcode = 5; END ...