split>b/b ( h -- b1 b2 )

Vocabulary

io.encodings.utf16.private

Inputs

h

an object

Outputs

b1	an object
b2	an object

Definition

USING: kernel math ;

IN: io.encodings.utf16.private

: split>b/b ( h -- b1 b2 )
    [ 255 bitand ] [ -8 shift 255 bitand ] bi ;