one-level-only? ( name prefix -- ? )

Vocabulary

vocabs.hierarchy.private

Inputs

name	an object
prefix	an object

Outputs

?

an object

Definition

USING: kernel splitting ;

IN: vocabs.hierarchy.private

: one-level-only? ( name prefix -- ? )
    ?head [ "." split1 nip not ] [ drop f ] if ;