world<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: world<< ( value object -- )

Methods

USING: accessors slots.private ui.pixel-formats ;

M: pixel-format world<< 4 set-slot ; inline


USING: accessors gpu.shaders kernel slots slots.private
ui.gadgets.worlds ;

M: program-instance world<<
    [ dup world? [ \ world bad-slot-value ] unless ] dip
    4 set-slot ; inline


USING: accessors slots.private ui.gestures ;

M: propagate-key-gesture-tuple world<< 3 set-slot ; inline


USING: accessors gpu.shaders kernel slots slots.private
ui.gadgets.worlds ;

M: shader-instance world<<
    [ dup world? [ \ world bad-slot-value ] unless ] dip
    4 set-slot ; inline


USING: accessors slots.private ui.gestures ;

M: user-input-tuple world<< 3 set-slot ; inline


USING: accessors slots.private ui.gadgets.worlds ;

M: world-error world<< 3 set-slot ; inline