ip-host? ( host -- ? )

Vocabulary

io.sockets.secure.openssl

Inputs

host

an object

Outputs

?

an object

Definition

USING: continuations io.sockets kernel sequences ;

IN: io.sockets.secure.openssl

: ip-host? ( host -- ? )
    dup ":" swap subseq?
    [ drop t ] [ [ <ipv4> drop t ] [ 2drop f ] recover ] if ;