<> <> <> <> <> <<>> <> <<>> SoftcardMonitorExch: CEDAR DEFINITIONS ~ BEGIN QUIT: CARD32 = 0; -- the type which stops WatchPacketsIn in the Sparc <<>> <> PutPacket: PROC [type, data1, data2: CARD32 _ 0, r: REF TEXT _ NIL]; <> ActionProc: TYPE ~ PROC[r: REF TEXT, type, data1, data2: CARD32]; Register: PROC [type: CARD32, proc: ActionProc, buff: REF TEXT _ NIL]; WatchPacketsIn: PROC; <> Restart: PROC; END.