<<>> <> <> <> <<>> <> <> <> DIRECTORY Rope USING [ROPE]; ThisMachineRegistry: CEDAR DEFINITIONS = BEGIN ROPE: TYPE ~ Rope.ROPE; ThisMachineRef: TYPE = REF ThisMachineProcsRec; ThisMachineProcsRec: TYPE = RECORD [ which: ATOM, Name: PROC RETURNS [ROPE], Address: PROC RETURNS [ROPE], ProcessorID: PROC [format: ATOM ¬ NIL] RETURNS [ROPE] ]; RegisterThisMachineProcs: PROC[newProcs: REF ThisMachineProcsRec]; GetThisMachineProcs: PROC RETURNS[LIST OF REF ThisMachineProcsRec]; <> END.