ShiftTest.cm

Last Edited by: Spreitzer, May 7, 1985 4:40:52 pm PDT

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

RoseUpdate Shifting

@Shifting.roseLoad

← &tsim ← RoseCreate.CreateSim[TRUE]

← RoseCreate.CreateTest[rootName: "ShiftingTest[5]", typeName: Shifting.NBitSR[[5]].name, testName: "T", decider: RoseCreate.DecideFromFile["ShiftingTest.5.expand"], sim: &tsim]

← RoseRun.Test[sim: &tsim, parms: NEW [RoseRun.TestParmsRep ← [FALSE, FALSE]]]

← RoseDisplayOps.MakeInterface[&tsim]