variables<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: variables<< ( value object -- )

Methods

USING: accessors slots.private stack-checker.values ;

M: declared-effect variables<< 5 set-slot ; inline


USING: accessors hashtables kernel slots slots.private threads ;

M: thread variables<<
    [ dup hashtable? [ \ hashtable bad-slot-value ] unless ] dip
    10 set-slot ; inline