IFUCorePads.mesa
Copyright c 1985 by Xerox Corporation. All rights reserved.
Last Edited by Curry, July 14, 1986 2:10:54 pm PDT
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, 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,
enRd:  ROPE  ← NIL,
disRd:  ROPE  ← NIL];
END.