Server Agent

{MakeServer +Service ?P}: input a Service that can be applied to a request, output a port P to send requests to

proc {MakeServer Service P}
   thread {ForAll {NewPort $ P} Service} end
end

Note: when Service is an object, MakeServer essentially turns it into an active object that can be queried through port P