set-servers ( threaded-server -- threaded-server )

Vocabulary

io.servers.private

Inputs

threaded-server

an object

Outputs

threaded-server

an object

Definition

USING: accessors kernel sequences ;

IN: io.servers.private

: set-servers ( threaded-server -- threaded-server )
    dup [
        dup dup listen-on
        [ no-ports-configured ] [ (make-servers) ] if-empty
        >>servers
    ] with-existing-secure-context ;