xerox Miscellaneous.mesa Oct77 free download

File name Miscellaneous.mesa_Oct77.pdf

miscellaNEOUS.mESA 24-0CT-77 18:38:25 Page 1 Miscellaneous.Mesa Edited by Sandman on October 11, 1977 9:46 AM DIRECTORY AltoDefs: FROM "altoders", BcdDefs: FROM "bcddefs", ControlDefs: FROM "controldefs", FrameDefs: FROM "framedefs", ImageDefs: FROM "imagedefs", InlineDefs: FROM "inlinedefs", MiscDefs: FROM "miscdefs", Mopcodes: FROM "mopcodes", OsStaticDefs: FROM "osstaticdefs", ProcessDers: FROM "processdefs", SegmentDefs: FROM "segmentdefs", TrapDefs: FROM "trapdefs"; DEFINITIONS FROM ControlOefs; Miscellaneous: PROGRAM IMPORTS FrameDefs, SegmentDefs EXPORTS FrameDeFs, ImageDefs, InlineDefs, MiscDefs, TrapDefs SHARES ControlDefs, ImageOefs = BEGIN PORTI: MACHINE CODE = INLINE [Mopcodes.zPORTI]: gftrover: CARDINAL p 0: -- okay to start a 0 because incremented before used NoGlobalFrameSlots: PUBLIC SIGNAL [CARDINAL] = CODE: EnterGlobalFrame: PUBLIC PROCEDURE [frame: GlobalFrameHandle, nslots: CARDINAL] RETURNS [entryindex: