Last edited by McCreight, May 20, 1986 4:06:59 pm PDT

Curry, September 14, 1986 10:00:53 am PDT

PLAOps;

BEGIN

PLAs: TYPE = { fetchControl, fetchRdDecode, fetchWtDecode, instrDecode, instrDecode0, instrDecode1, instrDecode2, instrDecode3, instrDecode4, instrDecode5, instrDecode6, interlock, mainPipeControl, stackAControl, stackBControl, stackDecode, rtDrFromPads, rtDrToPads, ltDrFromPads, ltDrToPads, ltDrDebug };

Sense:    TYPE = {input, output};

plas:    ARRAY PLAs OF PLAOps.PLA;

plaSizes:   ARRAY PLAs OF ARRAY Sense OF NAT;

IFUPLAEval: PROC [ plaType: PLAs ];

END.