cell-locs ( grid-layout -- locs )

Vocabulary

ui.gadgets.grids.private

Inputs

grid-layout

an object

Outputs

locs

an object

Definition

USING: accessors kernel sequences ;

IN: ui.gadgets.grids.private

: cell-locs ( grid-layout -- locs )
    dup fill?>>
    [ (compute-cell-locs) ] [
        [ (compute-cell-locs) ] [ grid>> ] bi
        [ adjust-for-baseline ] 2map
    ] if ;