extract-slots ( elements -- seq )

Vocabulary

help.lint.checks

Inputs

elements

an object

Outputs

seq

an object

Definition

USING: arrays help.markup kernel sequences sequences.deep ;

IN: help.lint.checks

: extract-slots ( elements -- seq )
    [ dup pair? [ first \ $slot = ] [ drop f ] if ] deep-filter
    [ second ] map ;