fill-buffer ( dialect -- ch buffer )

Vocabulary

io.encodings.utf7

Inputs

dialect

an object

Outputs

ch	an object
buffer	an object

Definition

USING: io kernel sequences ;

IN: io.encodings.utf7

: fill-buffer ( dialect -- ch buffer )
    dup second first first read1 dup swapd =
    [ drop decode-chunk ] [ nip { } ] if ;