board<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: board<< ( value object -- )

Methods

USING: accessors gamelib.ui slots.private ;

M: board-gadget board<< 21 set-slot ; inline


USING: accessors kernel slots slots.private tetris.board
tetris.game ;

M: tetris board<<
    [ dup board? [ \ board bad-slot-value ] unless ] dip
    2 set-slot ; inline