new-game ( gadget rows cols mines -- )

Vocabulary

minesweeper

Inputs

gadget	an object
rows	an object
cols	an object
mines	an object

Outputs

None

Definition

USING: accessors kernel ui ;

IN: minesweeper

: new-game ( gadget rows cols mines -- )
    [ make-cells ] dip place-mines update-counts >>cells
    f >>start f >>end relayout-window ;