c-type-boxer-quot ( name -- quot )

Vocabulary
alien.c-types

Definition

IN: alien.c-types

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

Methods

USING: accessors alien.c-types ;

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

USING: alien.arrays alien.c-types alien.data arrays kernel
sequences ;

M: array c-type-boxer-quot
    unclip [ array-length ] dip [ <c-direct-array> ] 2curry ;

USING: alien.c-types kernel ;

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

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

M: enum-c-type c-type-boxer-quot members>> enum-boxer ;

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

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