alien-callback-type-word

Vocabulary

alien.prettyprint

Definition

USING: alien.c-types kernel words ;

IN: alien.prettyprint

PREDICATE: alien-callback-type-word < typedef-word
    "callback-effect" word-prop >boolean ;

Methods

USING: alien.prettyprint alien.syntax definitions kernel ;

M: alien-callback-type-word definer drop \ CALLBACK: f ;


USING: alien.prettyprint definitions kernel ;

M: alien-callback-type-word definition drop f ;


USING: accessors alien.prettyprint combinators kernel
prettyprint.backend prettyprint.sections see see.private
sequences words ;

M: alien-callback-type-word synopsis*
    {
        [ seeing-word ]
        [ "callback-library" word-prop pprint-library ]
        [ definer. ]
        [ def>> first first pprint-c-type ]
        [ pprint-word ]
        [
            <block "(" text
            [ def>> first second ]
            [ "callback-effect" word-prop in>> ] bi
            pprint-function-args ")" text block>
        ]
    } cleave ;