XNSServerLocation:
CEDAR
DEFINITIONS
~ {
EachAddressProc: TYPE ~ PROC [addr: XNS.Address];
LocateServers: PROC [
socket: XNS.Socket, -- destination socket for broadcast
maxHops: CARDINAL, -- radius of broadcast
remotePgm: CARD,
remotePgmVersion: CARDINAL,
eachAddress: EachAddressProc, -- called with address of each responding server
firstResponseOnly: BOOL ← TRUE
];
}.