name-stack>sequence ( name-stack -- seq )

Vocabulary

io.sockets.secure.openssl

Inputs

name-stack

an object

Outputs

seq

an object

Definition

USING: classes.struct kernel openssl.libssl sequences ;

IN: io.sockets.secure.openssl

: name-stack>sequence ( name-stack -- seq )
    dup sk-num <iota>
    [ sk-value GENERAL_NAME_st memory>struct ] with map ;