;;;; package.lisp (defpackage #:backplane-server (:use #:cl) (:import-from #:arrows #:-> #:some->) (:import-from #:alexandria #:if-let) (:import-from #:cl-json #:decode-json-from-string #:encode-json-to-string) (:export #:make-success #:make-error #:success-p #:error-p #:parse-message #:handle-message #:handle-xmpp-message #:backplane-connect #:start-listening #:with-backplane #:message #:result/success #:result/error))