SwitchTest.cm
Last Edited by: Spreitzer, May 2, 1985 2:28:04 pm PDT
RoseUpdate SwitchTest
SwitchTest.roseLoad
← &sim ← RoseCreate.CreateSim[TRUE]
← RoseCreate.WrapTop[rootName: "switchTest", typeName: "ThreeI", decider: NIL, sim: &sim]
← &disp ← RoseDisplayOps.NewDisplay[sim: &sim, info: [iconic: FALSE]]
← &bv ← RoseDisplayBrowsing.BrowseDisplay[display: &disp, info: [iconic: FALSE]]
← &sim ← RoseCreate.CreateSim[TRUE]
← RoseCreate.WrapTop[rootName: "ringTest", typeName: "Ringo", decider: NIL, sim: &sim]
← &disp ← RoseDisplayOps.NewDisplay[sim: &sim, info: [iconic: FALSE]]
← &bv ← RoseDisplayBrowsing.BrowseDisplay[display: &disp, info: [iconic: FALSE]]
← &sim ← RoseCreate.CreateSim[TRUE]
← RoseCreate.WrapTop[rootName: "smAllTestRoot", typeName: "SmAllTest", decider: NIL, sim: &sim, clocks: "smIn0, smIn1"]
← &disp ← RoseDisplayOps.NewDisplay[sim: &sim, info: [iconic: FALSE]]
← &bv ← RoseDisplayBrowsing.BrowseDisplay[display: &disp, info: [iconic: FALSE]]