(trim-self) ( val key -- obj ? )

Vocabulary

lint.private

Inputs

val	an object
key	an object

Outputs

obj	an object
?	an object

Definition

USING: assocs kernel namespaces sequences ;

IN: lint.private

: (trim-self) ( val key -- obj ? )
    lint-definitions get-global at*
    [ dupd remove empty? not ] [ drop f ] if ;