ArbiterTest.cm
Copyright (C) 1984 by Xerox Corp. All rights reserved.
Last Edited by: Gasbarro, July 17, 1984 3:11:35 pm PDT
@Rosemary.cm
@ArbiterTest.RoseLoad
← &Sim ← RoseCreate.CreateSim[TRUE]
← &topCell ← RoseCreate.WrapTop["ArbiterTest", "ArbiterTest", NIL, "PhaseA, PhaseB", &Sim]
← &disp ← RoseDisplayOps.NewDisplay[sim: &Sim, info: [iconic: FALSE, name: "Arbiter Test"]]
← &bv ← RoseDisplayBrowsing.BrowseDisplay[display: &disp, info: [iconic: FALSE, name: "Arbiter Test"]]