Hoist broker startup into a module+ main
This commit is contained in:
parent
b72fca51b0
commit
8f181f5b4d
|
@ -111,5 +111,8 @@
|
|||
|
||||
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
|
||||
|
||||
(module+ main
|
||||
(run-ground
|
||||
(activate "..")
|
||||
(actor #:name 'broker:vh (assert (web-virtual-host "http" _ 8000)))
|
||||
(spawn-broker-server 8000)
|
||||
(spawn-broker-server 8000)))
|
||||
|
|
Loading…
Reference in New Issue