handle-TYPE ( obj -- )

Vocabulary

ftp.server

Inputs

obj

an object

Outputs

None

Definition

USING: accessors continuations kernel sequences ;

IN: ftp.server

: handle-TYPE ( obj -- )
    [
        tokenized>> second parse-type "Switching to " " mode"
        surround 200 server-response
    ] [ 2drop "TYPE is binary only" ftp-error ] recover ;