EULeafUtilsImpl.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Louis Monier May 19, 1986 12:20:36 pm PDT
Bertrand Serlet August 19, 1986 11:56:08 am PDT
DIRECTORY BooleCore, CD, Core, EULeafUtils, PW, PWCore, Rope, Sisyph;
EULeafUtilsImpl:
CEDAR
PROGRAM
IMPORTS BooleCore, PW, PWCore, Sisyph
EXPORTS EULeafUtils =
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["EU"];
eu2Cx ← Sisyph.Create[design: eu2Design];
};
alpsDesign ← BooleCore.cellLibrary;
alpsCx ← Sisyph.Create[alpsDesign];
};
Init[];
END.