<> <> <> <> DIRECTORY Process USING [Priority], Rope USING [ROPE]; LookerDefs: DEFINITIONS = BEGIN OPEN Process, Rope; <> DisplayChar: PROC [c: CHAR]; DisplayMultiple: PROC [desc: LONG DESCRIPTOR FOR PACKED ARRAY OF CHAR]; GetLength: PROC [r: ROPE] RETURNS [length: REAL]; SetPos: PROC [pos: REAL]; -- implicit SendNow -- SendNow: PROC; Clear: PROC; WriteTitle: PROC [r: ROPE]; NoteSlow: PROC [BOOL]; NotePausing: PROC [BOOL]; ScreenLines: PROC RETURNS [CARDINAL]; <> DiskChar: PROC [c: CHAR]; DiskMultiple: PROC [desc: LONG DESCRIPTOR FOR PACKED ARRAY OF CHAR]; DiskPos: PROC [pos: CARDINAL]; DiskCommit: PROC; <> InputAction: TYPE = RECORD [SELECT act: * FROM fast => NULL, newHost => [name: ROPE], pauseContinue => NULL, replay => NULL, slow => NULL, start => NULL, stop => NULL, writeLog => NULL, pktSize => [big: BOOL], ENDCASE]; DoAction: PROC [InputAction]; NewPriority: PROC [Priority]; ShowBroadcast: PROC [BOOL]; END.