DIRECTORY PLAOps; IFUPLAFetchControl: CEDAR DEFINITIONS = BEGIN FetchControlIn: TYPE = RECORD [ -- default must be zero for use initializing sigificance arg nextMacroJump: BOOL _ FALSE, reset: BOOL _ FALSE, iPReject: BOOL _ FALSE, jumpPending: BOOL _ FALSE, fetching: BOOL _ FALSE, fetchBytesM1: [0..32) _ 0, iPFaulted: BOOL _ FALSE, iPFaulting: BOOL _ FALSE ]; FetchControlOut: TYPE = RECORD [-- default must be zero jumpPending: BOOL _ FALSE, newFetch: BOOL _ FALSE, fetching: BOOL _ FALSE, iPFaulted: BOOL _ FALSE, fetchWtIndexCtl: FetchWtIndexCtl _ hold ]; FetchWtIndexCtl: TYPE = MACHINE DEPENDENT {hold(0), inc(3), clear(5)}; END. ΆIFUPLAFetchControl.mesa Copyright c 1984 by Xerox Corporation. All rights reserved. Last edited by Twilliams, August 27, 1984 6:28:59 pm PDT Last edited by Curry, July 8, 1986 7:52:36 pm PDT Last edited by Herrmann, August 14, 1985 12:42:42 pm PDT Last edited by McCreight, June 6, 1986 6:11:06 pm PDT RdIndexCtl: TYPE = MACHINE DEPENDENT {inc0(0), inc1(3), inc2(5), inc3(9), inc5(17), set0(33), set1(65), set2(129), set3(257)}; Κ€˜JšΠbl™šœ Οmœ1™