CoreTest.cm
Copyright © 1985 by Xerox Corporation. All rights reserved.
Barth, November 7, 1985 5:50:21 pm PST
Louis Monier October 23, 1985 3:19:19 pm PDT
Bertrand Serlet November 22, 1985 2:38:22 pm PST
CDCmosA
Onion
Rosemary
Sinix
run SSI
run CrossRAMImpl CrossRAMPads CrossRAMTop CrossRAMDataBuffer CrossRAMDecoder CrossRAMRAM CrossRAMBottom
← &context ← CoreCompose.CreateContext[]
← CoreCompose.RegisterBoolProperty[$Rosemary]
← CoreCompose.PushBool[&context, $Rosemary, FALSE]
← CoreCompose.RegisterBoolProperty[$PWCore]
← CoreCompose.PushBool[&context, $PWCore, TRUE]
← CoreCompose.RegisterBoolProperty[$Sinix]
← CoreCompose.PushBool[&context, $Sinix, TRUE]
← CoreCompose.RegisterRefProperty[$sourceCDDesign]
← CoreCompose.PushRef[&context, $sourceCDDesign, PW.OpenDesign["CrossRAMCellLibrary"]]
date
← &ct ← CoreCompose.CreateStructure["CrossRAM", &context]
date
← &layout ← PWCore.GetLayout[&ct]
← &design ← PW.Draw[&layout]
-- ← CDIO.WriteDesign[&design, "CrossRAMCore"]