each-cell ( ... cells quot: ( ... row col cell -- ... ) -- ... )


Vocabulary
minesweeper

Inputs
cellsan object
quota quotation with stack effect ( ... row col cell -- ... )


Outputs
None

Definition


:: each-cell
( ... cells quot: ( ... row col cell -- ... ) -- ... )
cells
[| row | [| cell col | row col cell quot call ] each-index ]
each-index ; inline