MultipleServer: obj LIB.SocketSystem.SocketSystem
Handler: BasicProcess("Handler")
in theClient: ref Socket
H: ref Handler
Server: obj BasicProcess("Server")
thisServer: obj Socket -- Ref=none without LIB - adr(Socket)
terminated: var boolean
aClient: ref Socket
waitHandler:
Worker: obj BasicProcess("Worker")