c-type-unboxer-quot ( name -- quot )

Vocabulary

alien.c-types

Inputs

name

an object

Outputs

quot

an object

Definition

IN: alien.c-types

GENERIC: c-type-unboxer-quot ( name -- quot )

Methods

USING: accessors alien.c-types ;

M: abstract-c-type c-type-unboxer-quot unboxer-quot>> ;


USING: alien alien.c-types arrays kernel ;

M: array c-type-unboxer-quot drop [ >c-ptr ] ;


USING: alien.c-types kernel ;

M: c-type-name c-type-unboxer-quot
    [ lookup-c-type ] call \ c-type-unboxer-quot execute ;


USING: alien.c-types alien.enums alien.enums.private kernel ;

M: enum-c-type c-type-unboxer-quot drop [ enum>number ] ;


USING: alien.arrays alien.c-types alien.strings
io.encodings.binary kernel sequences ;

M: string-type c-type-unboxer-quot
    second dup binary =
    [ drop void* c-type-unboxer-quot ]
    [ [ string>alien ] curry ] if ;