fulfill-client ( obj -- )

Vocabulary

ftp.server

Inputs

obj

an object

Outputs

None

Definition

USING: accessors concurrency.promises kernel namespaces ;

IN: ftp.server

: fulfill-client ( obj -- )
    client get extra-connection>>
    [ fulfill ] [
        drop
        "Establish an active or passive connection first"
        ftp-error
    ] if* ;