string>word ( string -- word )

Vocabulary

furnace.utilities

Inputs

string

an object

Outputs

word

an object

Definition

USING: kernel splitting words ;

IN: furnace.utilities

: string>word ( string -- word )
    ":" split1 swap 2dup lookup-word dup
    [ 2nip ] [ drop no-such-word ] if ;