; syndicate-server -c chat.pr

<require-service <relay-listener <tcp "0.0.0.0" 9001> $gatekeeper>>

let ?ds = dataspace
<bind "syndicate" #x"" $ds>