map-literals ( obj quot: ( obj -- obj' ) -- seq )

Vocabulary

modern.out

Inputs

obj	an object
quot	a quotation with stack effect ( obj -- obj' )

Outputs

seq

an object

Definition

USING: kernel sequences ;

IN: modern.out

: map-literals ( obj quot: ( obj -- obj' ) -- seq )
    [ (map-literals) ] curry map ; inline recursive