DIRECTORY Imager, IPConstants, IPCoTab, IPCTG, IPTop; IPCIG: CEDAR DEFINITIONS = BEGIN Ref: TYPE = REF Rep; Rep: TYPE = RECORD[ ]; EachNodeAction: TYPE = PROC[cig: Ref] RETURNS[quit: BOOL _ FALSE]; EachArcAction: TYPE = PROC[cig: Ref] RETURNS[quit: BOOL _ FALSE]; Create: PROC[top: IPTop.Ref] RETURNS[cig: Ref]; Destroy: PROC [cig: Ref]; InsertPin: PROC[cig: Ref, comp: IPCoTab.Component]; RemovePin: PROC[cig: Ref, comp: IPCoTab.Component]; Verify: PROC[cig: Ref]; PaintSelf: PROC[cig: Ref, context: Imager.Context, xOffset, yOffset: REAL, scaleFactor: REAL _ 1.0, stipple: CARDINAL _ IPConstants.Gray, drawOutline: BOOL _ TRUE, drawComp:BOOL _ FALSE, showCompName: BOOL _ TRUE]; END. Ά-- File: IPCIG.mesa Copyright c 1986 by Xerox Corporation. All rights reserved. Last Edited by: Preas, August 18, 1986 5:14:44 pm PDT Provides abstraction for channel intersection graphs Invalidates r and frees up the space Add the Pin to cig. Remove a pin from cig Verify cig if drawOutline is true then the outline (based on the hint) will be drawn; if drawComp is true then the shape of the actual component will be drawn. Κγ˜šœ™Icodešœ Οmœ1™