<> <> <> <> <> DIRECTORY Rope; ICTestNew: CEDAR DEFINITIONS = BEGIN ForceAssignments: TYPE = LIST OF ForceAssignment; ForceAssignment: TYPE = RECORD[card: Card, timingGroup: PodTimingGroup]; AcquireAssignments: TYPE = LIST OF AcquireAssignment; AcquireAssignment: TYPE = RECORD[card: Card, timingGroup: AcquirePodTimingGroup]; TestButtonsCreateProc: TYPE = PROC[createButton: PROC [buttonName: Rope.ROPE, proc: TestProc]]; <> TestProc: TYPE = PROC [p: ValueWire, Eval: PROC, clientHandle: REF ANY _ NIL]; MakeStandardViewer: PROC [name: ROPE _ NIL, testButtons: TestButtonsCreateProc _ NIL, clientHandle: REF ANY _ NIL]; MakeStandardButtons: PROC [clientHandle: REF ANY _ NIL, viewer: Viewers.Viewer, height: CARDINAL, testButtons: TestButtonsCreateProc _ NIL]; DefineForceGroup: PROC [cellType: Core.CellType, groupName: ROPE _ NIL, assignments: ForceAssignments, format: IMSTester.FormatType, delay: NSec _ 0, width: NSec _ 0, hiDrive: REAL _ 2.4, loDrive: REAL _ 0.4]; DefineAcquireGroup: PROC [cellType: Core.CellType, groupName: ROPE _ NIL, assignments: AcquireAssignments, sample: NSec _ 0, threshold: REAL _ 1.4]; <> DefineChannel: PROC [wire: Core.Wire, card: Card, timingGroup: PodTimingGroup, channel: PodByteChannel _ 0]; <> <<>> END.