convert-signed-quot ( n -- quot )

Vocabulary

endian.private

Inputs

n

an object

Outputs

quot

an object

Definition

USING: alien.c-types alien.data combinators ;

IN: endian.private

: convert-signed-quot ( n -- quot )
    {
        { 1 [ [ int8_t <ref> int8_t deref ] ] }
        { 2 [ [ int16_t <ref> int16_t deref ] ] }
        { 4 [ [ int32_t <ref> int32_t deref ] ] }
        { 8 [ [ int64_t <ref> int64_t deref ] ] }
        [ invalid-signed-conversion ]
    } case ; inline