n-signed-le> ( seq c-ptr n -- x )

Vocabulary

endian.private

Inputs

seq	an object
c-ptr	an object
n	an object

Outputs

x

an object

Definition

USING: alien.data endian kernel ;

IN: endian.private

: n-signed-le> ( seq c-ptr n -- x )
    [ [ deref little-endian ] curry ] dip
    [ t ?byte-reverse ] curry compose
    [ slow-signed-le> ] if-c-ptr ; inline