file ///StdCell23/SCObjUtil.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
object utility routines
DIRECTORY
SC,
SCPrivate;
SCObjUtil: CEDAR DEFINITIONS =
BEGIN
EnumerateObjects: PROC [handle: SC.Handle, startObj, stopObj: SCPrivate.MaxObjectsSr, eachObject: EachObjectProc] RETURNS [quit: BOOL];
EnumerateAllObjects: PROC [handle: SC.Handle, eachObject: EachObjectProc] RETURNS [quit: BOOL];
EachObjectProc: TYPE = PROC [object: SCPrivate.Object] RETURNS [quit: BOOL ← FALSE];
EnumeratePinsOnObject: PROC [object: SCPrivate.Object, eachPin: EachPinProc] RETURNS [quit: BOOL];
EachPinProc: TYPE = PROC [object: SCPrivate.Object, pin: NAT, objectPin: SCPrivate.ObjectPin] RETURNS [quit: BOOL ← FALSE];
END.