minimart-2014/minimart/examples/broker.rkt

13 lines
371 B
Racket
Raw Normal View History

#lang minimart
;; Generic broker for WebSockets-based minimart/marketplace communication.
(require minimart/drivers/timer)
(require minimart/drivers/websocket)
2014-08-09 23:29:05 +00:00
(require minimart/broker/server)
(spawn-timer-driver)
(spawn-websocket-driver)
(spawn-world
2014-08-09 23:29:05 +00:00
(spawn-broker-server 8000)
(spawn-broker-server 8443 (websocket-ssl-options "server-cert.pem" "private-key.pem")))