secure-connection ( client-out addrspec -- )

Vocabulary

io.sockets.secure.openssl

Inputs

client-out	an object
addrspec	an object

Outputs

None

Definition

USING: accessors io.timeouts kernel ;

IN: io.sockets.secure.openssl

: secure-connection ( client-out addrspec -- )
    [ handle>> ] dip [
        [
            [ get-session ] [ resume-session ] [ begin-session ]
            ?if
        ] curry with-timeout
    ] [ drop t >>connected drop ] 2bi ;