<> <> <> DIRECTORY IntStorageDefs, MPCDefs, ParserErrorDefs, ParserTypeDefs, Rope; OutputDefs: CEDAR DEFINITIONS = BEGIN RelationType: TYPE = {rel, same, norel, dontcare}; VisibleType: TYPE = {yes, no, maybe}; <> <> InitOutput: PROCEDURE [chip: REF MPCDefs.ChipDescriptor] RETURNS [BOOL]; InitProject: PROCEDURE [project: REF MPCDefs.ProjectDescriptor] RETURNS [BOOL]; FinishOutput: PROCEDURE RETURNS [BOOL]; <> SendMessage: PROCEDURE [type: ParserErrorDefs.ErrorType, message: Rope.ROPE, wantCR: BOOL _ TRUE]; <> Map: PROCEDURE [layerName: Rope.ROPE] RETURNS [CARDINAL]; <> OutputWire: PROCEDURE [visible: VisibleType, layerName: CARDINAL, width: LONG CARDINAL, a: ParserTypeDefs.Path]; OutputFlash: PROCEDURE [visible: VisibleType, layerName: CARDINAL, diameter: LONG CARDINAL, center: ParserTypeDefs.Point]; OutputPolygon: PROCEDURE [visible: VisibleType, layerName: CARDINAL, a: ParserTypeDefs.Path]; OutputBox: PROCEDURE [visible: VisibleType, layerName: CARDINAL, length, width: LONG CARDINAL, center: ParserTypeDefs.Point, xRotation, yRotation: INT]; OutputUserCommand: PROCEDURE [command: [0..9], userText: Rope.ROPE]; OutputUserObject: PROCEDURE [visible: VisibleType, layerName: CARDINAL, data: REF ANY]; <> Relation: PROCEDURE [left1, right1, bottom1, top1, left2, right2, bottom2, top2: INT] RETURNS [RelationType]; <> Visible: PROCEDURE [kind: IntStorageDefs.Object, level: CARDINAL, parentVis: VisibleType, left,right,bottom,top: INT] RETURNS [VisibleType]; --parentVis added - MN, June 10, 1981 6:23 PM <> BBWire: PROCEDURE [layerName: CARDINAL, width: LONG CARDINAL, a: ParserTypeDefs.Path] RETURNS [left,right,bottom,top: INT]; BBFlash: PROCEDURE [layerName: CARDINAL, diameter: LONG CARDINAL, center: ParserTypeDefs.Point] RETURNS [left,right,bottom,top: INT]; BBPolygon: PROCEDURE [layerName: CARDINAL, a: ParserTypeDefs.Path] RETURNS [left,right,bottom,top: INT]; BBBox: PROCEDURE [layerName: CARDINAL, length, width: LONG CARDINAL, center: ParserTypeDefs.Point, xRotation, yRotation: INT] RETURNS [left,right,bottom,top: INT]; BBUserObject: PROCEDURE [layerName: CARDINAL, data: REF ANY] RETURNS [left,right,bottom,top: INT]; END.