hairy-local-allot-quot ( c-type initial -- quot )

Vocabulary

alien.data.private

Inputs

c-type	an object
initial	an object

Outputs

quot

an object

Definition

USING: alien.c-types kernel ;

IN: alien.data.private

: hairy-local-allot-quot ( c-type initial -- quot )
    over
    '[ _ simple-local-allot-quot _ over 0 _ set-alien-value ] ;