SinixBridge.mesa
Copyright © 1985 by Xerox Corporation. All rights reversed.
Created by Bertrand Serlet August 15, August 21, 1985 11:14:27 am PDT
Bertrand Serlet October 24, 1985 7:04:55 pm PDT
This private interface is here just because Christian is parano
DIRECTORY
CD USING [Object, ObjectClass, Position],
CDDirectory USING [AnotherProc],
Core USING [Wire];
SinixBridge:
CEDAR
DEFINITIONS =
BEGIN
A new class of ChipNDale objects is created, so to harmoniously handle in a lazy way geometry attached to wires.
sinixBridgeClass: REF CD.ObjectClass;
WireToObjectBridge:
PROC [fatherSize:
CD.Position, wire: Core.Wire]
RETURNS [object:
CD.Object];
Creates a new object of class $WireToObjectBridge. The wire wire is a publicWire that must have the attribute sinixWireGeometryProp. The fatherSize is used for knowing the size of the expansion.
ExpandAsGeometry: CDDirectory.AnotherProc;
The expansion contains all the geometry of wire
ExpandAsPins: CDDirectory.AnotherProc;
The expansion contains all the pins of wire
END.