listen-on ( threaded-server -- addrspecs )


Vocabulary
io.servers.private

Inputs
threaded-serveran object


Outputs
addrspecsan object


Definition
USING: accessors io.sockets io.sockets.secure kernel sequences ;

IN: io.servers.private

: listen-on ( threaded-server -- addrspecs )
[ secure>> ssl-supported? [ >secure ] [ drop { } ] if ]
[ insecure>> >insecure ] bi append [ resolve-host ] map
concat configurable-addrspecs ;