DIRECTORY CD, CDDirectory, CDIO, CDOps, CDViewer, Core, CoreProperties, IO, PWCore, Rope, Sisyph; SmallCachePmCodeTest: CEDAR PROGRAM IMPORTS CDDirectory, CDIO, CDOps, CDViewer, CoreProperties, PWCore, Rope, Sisyph = BEGIN design: CD.Design _ CDViewer.FindDesign["SmallCachePmCodeTest"]; cx: Sisyph.Context _ Sisyph.Create[design]; nms: LIST OF IO.ROPE _LIST[ "SCPnPCnRegPLA", "SCPPCnRegPLA", "SCPnPCnRegSC", "SCPPCnRegSC", "SCPnPCRegSC", "SCPPCRegSC"]; FOR nms _ nms, nms.rest WHILE nms#NIL DO nm: IO.ROPE _ nms.first.Cat[".icon"]; ct: Core.CellType _ Sisyph.ES[nm, cx]; obj: CD.Object; subDes: CD.Design _ CDOps.CreateDesign[design.technology]; IF nm.Find["RegSC"]#-1 THEN CoreProperties.PutCellTypeProp[ct, $Layout, $SC]; obj _ PWCore.Layout[ct]; [] _ CDDirectory.Include [subDes, obj, nms.first.Cat[".mask"]]; [] _ CDOps.IncludeObject [subDes, obj]; [] _ CDOps.RenameDesign [subDes, nms.first]; [] _ CDIO.WriteDesign [subDes, nms.first]; ENDLOOP; END. JSmallCachePmCodeTest.mesa Don Curry January 21, 1988 1:24:34 pm PST ÊG˜šœ™Jšœ)™)—J˜šÏk ˜ Jšœ<œ˜W—J˜šÏnœœ˜#Jšœ3œ˜R—Jš˜J˜Jšœ@˜@Jšœ-˜-š œœœœœœ˜Jšœ˜Jšœ˜Jšœ˜Jšœ˜Jšœ˜Jšœ˜—šœœœ˜(Jšœœœ˜(Jšœœ ˜(Jšœœ˜Jšœœ0˜:Jšœœ2˜MJšœ˜JšœA˜AJšœ)˜)Jšœ-˜-Jšœ,˜,Jšœ˜—J˜Jšœ˜—…—Òc