DIRECTORY Basics: TYPE USING [BYTE], PrincOps: TYPE USING [ globalbase, localbase, zEFC0, zJ2, zJEQ2, zJNE2, zLFC1, zLG0, zLI0, zLL0, zPL0, zR0, zRIL0, zSG0, zSL0, zW0]; OpCodeParams: DEFINITIONS = BEGIN OPEN PrincOps; BYTE: TYPE = Basics.BYTE; GlobalBase: CARDINAL = PrincOps.globalbase; GlobalHB: TYPE = [GlobalBase..GlobalBase+16); GlobalLoadSlots: TYPE = [GlobalBase..GlobalBase+8); GlobalStoreSlots: TYPE = [GlobalBase..GlobalBase+4); LocalBase: CARDINAL = PrincOps.localbase; LocalHB: TYPE = [LocalBase..LocalBase+16); LocalLoadSlots: TYPE = [LocalBase..LocalBase+8); LocalStoreSlots: TYPE = [LocalBase..LocalBase+8); LocalPutSlots: TYPE = [LocalBase..LocalBase+4); HB: TYPE = [0..16); LoadImmediateSlots: TYPE = [0..7); ReadSlots: TYPE = [0..5); WriteSlots: TYPE = [0..3); RILSlots: TYPE = [0..1); MaxFIAJumps: INTEGER = 8; MaxFICJumps: INTEGER = 8; MaxFBJumps: INTEGER = 121; MaxBBJumps: INTEGER = 127; ExternalProcBase: CARDINAL = 0; LocalProcBase: CARDINAL = 1; ExternalProcSlots: TYPE = [ExternalProcBase..ExternalProcBase+16); LocalProcSlots: TYPE = [LocalProcBase..LocalProcBase+8); DstarLocalProcSlots: TYPE = [LocalProcBase..LocalProcBase+16); zRILn: BYTE = zRIL0; zEFCn: BYTE = zEFC0; zLFCn: BYTE = zLFC1; zLIn: BYTE = zLI0; zLLn: BYTE = zLL0; zSLn: BYTE = zSL0; zLGn: BYTE = zLG0; zSGn: BYTE = zSG0; zPLn: BYTE = zPL0; zRn: BYTE = zR0; zWn: BYTE = zW0; zJn: BYTE = zJ2; zJEQn: BYTE = zJEQ2; zJNEn: BYTE = zJNE2; END. ¬file OpCodeParams.mesa last edited by Sweet on Feb 15, 1979 12:46 PM last edited by Satterthwaite 15-Apr-81 16:20:24 Last Edited by: Maxwell, August 11, 1983 8:59 am ÊN˜Jšœ™Jšœ-™-Jšœ/™/J™0J˜šÏk ˜ Jšœœœœ˜šœ œœ˜Jšœm˜m—J˜—šœ œ˜Jšœœ ˜J˜Jšœœ œ˜J˜Jšœ œ˜+Jšœ œ˜-Jšœœ˜3Jšœœ˜4J˜Jšœ œ˜)Jšœ œ˜*Jšœœ˜0Jšœœ˜1Jšœœ˜/J˜Jšœœ ˜Jšœœ ˜"Jšœ œ ˜Jšœ œ ˜Jšœ œ ˜Jšœ œ˜Jšœ œ˜Jšœ œ˜Jšœ œ˜J˜Jšœœ˜Jšœœ˜Jšœœ+˜BJšœœ$˜8Jšœœ%˜>J˜Jšœœ ˜Jšœœ ˜Jšœœ ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ˜Jšœœ ˜Jšœœ ˜J˜Jšœ˜J˜——…—¦