make-packed-slots ( slots -- slot-specs )

Vocabulary

classes.struct.private

Inputs

slots

an object

Outputs

slot-specs

an object

Definition

USING: accessors sequences slots ;

IN: classes.struct.private

: make-packed-slots ( slots -- slot-specs )
    make-slots [ t >>packed? ] map! ;