ShiftTest.cm

Last Edited by: Spreitzer, June 24, 1984 5:07:03 pm PDT

Last Edited by: Barth, March 7, 1983 12:13 pm

@RoseSim.cm

@Shifting.roseLoad

← &sim ← RoseCreate.CreateSim[TRUE]

← &topCell ← RoseCreate.CreateTopCell[instanceName: "shi4top", typeName: Shifting.TopNBitSR[[5]].name, decider: RoseCreate.DecideFromFile["shi4top.altexpand"], sim: &sim]

← &disp ← RoseDisplayOps.NewDisplay[sim:&sim, info: [iconic: FALSE, name: "shi4top.Display"]]

← &bv ← RoseDisplayBrowsing.BrowseDisplay[display:&disp, info: [iconic: FALSE, name: "shi4top.Browser"]]