layouts ( sized? gadgets -- layouts )

Vocabulary

ui.gadgets.layout

Inputs

sized?	an object
gadgets	an object

Outputs

layouts

an object

Definition

USING: accessors kernel sequences ui.gadgets ;

IN: ui.gadgets.layout

: layouts ( sized? gadgets -- layouts )
    [ [ gadget? ] [ layout? ] bi or ] filter swap
    [ [ dup layout? [ f <layout> ] unless ] map ]
    [ [ dup gadget? [ gadget>> ] unless ] map ] if ;