#lang imperative-syndicate (provide (all-defined-out)) ;; Client protocol (assertion-struct to-broker (address assertion)) (assertion-struct from-broker (address assertion)) (assertion-struct broker-connection (address)) (assertion-struct broker-connected (address)) (message-struct force-broker-disconnect (address))