read-only-slots ( values class -- slots )

Vocabulary

compiler.tree.propagation.slots

Inputs

values	an object
class	an object

Outputs

slots

an object

Definition

USING: accessors classes.tuple compiler.tree.propagation.info
kernel sequences ;

IN: compiler.tree.propagation.slots

: read-only-slots ( values class -- slots )
    all-slots [ read-only>> [ value-info ] [ drop f ] if ] 2map
    f prefix ;