quadruple ( stream byte -- stream char )

Vocabulary

io.encodings.utf8.private

Inputs

stream	an object
byte	an object

Outputs

stream	an object
char	an object

Definition

USING: math ;

IN: io.encodings.utf8.private

: quadruple ( stream byte -- stream char )
    7 bitand
    append-nums append-nums append-nums 65536 minimum-code-point
    1114111 maximum-code-point ; inline