<> <> <> <> DIRECTORY CommandTool, Process, Rope, TerminalIO, UserProfile; CDStarter: CEDAR PROGRAM IMPORTS CommandTool, Rope, TerminalIO, UserProfile, Process = BEGIN StartPrograms: PROC[] = BEGIN runList: LIST OF Rope.ROPE = UserProfile.ListOfTokens[key: "Chipndale.RunPrograms"]; FOR l: LIST OF Rope.ROPE _ runList, l.rest WHILE l#NIL DO IF NOT Rope.IsEmpty[l.first] THEN { msg: Rope.ROPE = CommandTool.Run[bcdName: l.first].errMsg; IF msg#NIL THEN TerminalIO.WriteRope[msg]; } ENDLOOP; END; TrojanHorse: PROC[] = BEGIN trojanHorse: Rope.ROPE = "/indigo/chipndale/5.2/cd19/CDTroja"; TRUSTED {Process.SetPriority[Process.priorityBackground]}; [] _ CommandTool.Run[bcdName: trojanHorse]; END; StartPrograms[]; <> END.