EU2RouteImpl.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Louis Monier March 17, 1986 4:16:03 pm PST
DIRECTORY CoreCreate, EU2Route, EU2Utils, PWCore;
EU2RouteImpl:
CEDAR
PROGRAM
IMPORTS CoreCreate, EU2Utils, PWCore
EXPORTS EU2Route =
BEGIN OPEN CoreCreate, EU2Route, EU2Utils;
-- Buses: (ramA, ramB, kReg, cBus, ifuIn)[0..32), Vdd, Gnd
CreateRoute1:
PUBLIC PROC [bottom, top: CellType]
RETURNS [cellType: CellType] = {
left, right: Wire;
left ← Bus["kReg"];
right ← Wires[Bus["cBus"], Bus["ifuIn"]];
cellType ← Cell[
name: "Route1",
public: Wires[Bus["ramA"], Bus["ramB"], Bus["kReg"], Bus["cBus"], Bus["ifuIn"], "Vdd", "Gnd"],
instances: NIL
];
-- channel from EU2Ram on top and kReg
PWCore.SetLayout[cellType, $ChannelY, $ChannelYProps, LIST[bottom, top, left, right]];
};
END.