(decode-zbase32) ( stream -- )

Vocabulary

base32.private

Inputs

stream

an object

Outputs

None

Definition

USING: base64.private kernel sequences ;

IN: base32.private

: (decode-zbase32) ( stream -- )
    8 "\n\r" pick read-ignoring
    [ drop ] [ 8 61 pad-tail zdecode8 (decode-zbase32) ]
    if-empty ;