SCTest.mesa
Copyright © 1985 by Xerox Corporation. All rights reserved.
Last Edited by: Preas, September 5, 1985 10:39:21 am PDT
Frank Bowers December 20, 1985 2:38:20 pm PST
Bryan Preas March 24, 1986 4:54:06 pm PST
To run the standard cell test package: SCTestXXXX.cm (XXXX -> Tiny or Small
DIRECTORY
CD,
CDIO,
CDOps,
Core,
CoreCompose,
Rope,
SC,
SCTestUtil;
SCTest: CEDAR PROGRAM
IMPORTS CDIO, CDOps, Rope, SC, SCTestUtil
SHARES SC =
BEGIN
context: CoreCompose.Context;
cellType: Core.CellType;
result: SC.Result;
cdDesign: CD.Design;
libName: Rope.ROPE ←"SCTestLib.dale";
hMaterial: Rope.ROPE ← "metal";
vMaterial: Rope.ROPE ← "poly";
libDesign: CD.Design ← CDIO.ReadDesign[libName];
[context, cellType] ← SCTestUtil.CreateCore[];
IF libDesign = NIL THEN
SC.Signal[callingError, Rope.Cat["Unable to load library: ", libName]];
cdDesign ← CDOps.CreateDesign[libDesign.technology];
result ← SCTestUtil.DoLayout[context, cellType, cdDesign, libDesign, hMaterial, vMaterial];
SCTestUtil.WriteLayout[result, cdDesign];
END.