EURawExtract.cm
Copyright Ó 1987 by Xerox Corporation. All rights reserved.
Bertrand Serlet April 9, 1987 1:55:53 am PDT
Assertions on the file EUCompleteLayout are that it contains the cells RamControl, SCControl, DPControl, DataPath, PadBlank, Name.pict, Logo2, CopyRight.pict, EU (top level one)
Statistics on
Install Extract
Run SinixRawCMosBImpl
← SinixRawCMosBImpl.justKeepOne ← TRUE
TakeHeapstats
← &design ← PW.OpenDesign["EUEmptyLayout"]
← &design ← PW.OpenDesign["EUCompleteLayout"]
← CDViewer.CreateViewer[&design, FALSE]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "PadBlank"], $RawCMosBExtractProc, $ExtractCellAsWire]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "Name.pict"], $RawCMosBExtractProc, $ExtractNull]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "Logo2"], $RawCMosBExtractProc, $ExtractNull]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "CopyRight.pict"], $RawCMosBExtractProc, $ExtractNull]
← SinixRawCMosBImpl.Mark[&design]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "RamControl"], $RawFlatten, NIL]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "SCControl"], $RawFlatten, NIL]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "DPControl"], $RawFlatten, NIL]
← CDProperties.PutProp[CDDirectory.Fetch[&design, "DataPath"], $RawFlatten, NIL]
← &obj ← CDDirectory.Fetch[&design, "EU"]
TakeHeapstats -d
date
← &ct ← Sinix.Extract[&obj, SinixRawCMosB.mode, NIL, NEW [INT ← 0]].result
date
TakeHeapstats -d
← CoreIO.ReportSaveCellType[&ct]
← &padsDesign ← PW.OpenDesign["EU4Top"]
← &source ← Sisyph.ES["EUTop.sch", Sisyph.Create[&padsDesign]]
← &new ← SinixRawCMosBImpl.MatchSourceToExtracted[Sisyph.mode, CD.commentLayer, &source, &ct, "RawEU"]
← CoreIO.ReportSaveCellType[&new]
Install Rosemary PWCore
← RosemaryImpl.sizeHackEnable ← TRUE
Run -a EUUtilsImpl EUArithImpl
run -a EUSim
← &sim ← EUSim.ExerciseRose[&new, NIL].display.simulation
← Rosemary.Initialize[simulation: &sim, steady: FALSE]
← EUSim.Register[usingTester: FALSE]