uu-encode ( -- )

Vocabulary

uu

Inputs

None

Outputs

None

Definition

USING: io namespaces uu.private ;

IN: uu

: uu-encode ( -- )
    "begin" print input-stream get
    [ binary>ascii print ] 45 (each-stream-block) "end" print ;