IFUCorePads.mesa
Copyright c 1985 by Xerox Corporation. All rights reserved.
Last Edited by Curry, September 5, 1986 5:31:41 pm PDT
Don Curry October 30, 1986 9:37:15 pm PST
DIRECTORY CD, Core, CoreFrame;
IFUCorePads: CEDAR DEFINITIONS = 
BEGIN
Side: TYPE = CoreFrame.Side;
ROPE: TYPE = Core.ROPE;
CellProc: PROC [
name: ROPE  ← NIL,
data: PadRec ]
RETURNS [cellType: Core.CellType]; -- padCellClass
padCellClass: Core.CellClass;
Pad:   TYPE = REF PadRec;
PadsType:  TYPE = {
empty, conn, in,
out, gate2Out, gate3Out,gate4Out, triOut, triIO,
clock, ext, corLo, corHi, gnd,vdd, padgnd, padvdd};
PadRec:  TYPE = RECORD[
type:  PadsType ← empty,
side:  Side   ← top,
data1:  ROPE  ← NIL,
data2:  ROPE  ← NIL,
enWtA: ROPE  ← NIL,
enWtB: ROPE  ← NIL,
enWtC: ROPE  ← NIL,
enRd:  ROPE  ← NIL,
disRd:  ROPE  ← NIL];
END.