EU2LeafUtilsImpl.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Louis Monier May 19, 1986 12:20:36 pm PDT
Bertrand Serlet March 12, 1986 10:05:15 pm PST
DIRECTORY BooleCore, CD, Core, EU2LeafUtils, PW, PWCore, Rope, Sisyph;
EU2LeafUtilsImpl:
CEDAR
PROGRAM
IMPORTS BooleCore, PW, PWCore, Sisyph
EXPORTS EU2LeafUtils =
BEGIN
ROPE: TYPE = Rope.ROPE;
eu2Design, alpsDesign: PUBLIC CD.Design;
eu2Cx, alpsCx: Sisyph.Context;
Extract:
PUBLIC
PROC [name:
ROPE]
RETURNS [cellType: Core.CellType] ~ {
cellType ← Sisyph.ExtractSchematicByName[name: name, cx: eu2Cx];
};
AlpsExtract:
PUBLIC
PROC [name:
ROPE]
RETURNS [cellType: Core.CellType] ~ {
cellType ← Sisyph.ExtractSchematicByName[name: name, cx: alpsCx];
PWCore.SetGet[cellType, alpsDesign];
};
Init:
PROC ~ {
defaultGlobalNames: LIST OF ROPE ← CONS["PadGnd", CONS["PadVdd", Sisyph.defaultGlobalNames]];
IF eu2Design=
NIL
THEN {
-- not yet read
eu2Design ← PW.OpenDesign["EU2"];
eu2Cx ← Sisyph.Create[design: eu2Design, globalNames: Sisyph.defaultGlobalNames];
};
alpsDesign ← BooleCore.cellLibrary;
alpsCx ← BooleCore.cx;
};
Init[];
END.