read-struct-slot ( slot -- quot: ( struct -- value ) )

Vocabulary

classes.struct.private

Inputs

slot

an object

Outputs

quot	a quotation with stack effect ( struct -- value )

Definition

USING: accessors kernel stack-checker.dependencies ;

IN: classes.struct.private

MACRO: read-struct-slot
    ( slot -- quot: ( struct -- value ) )
    dup type>> add-depends-on-c-type (reader-quot) ;