find-` ( string -- n/f )

Vocabulary

txon.private

Inputs

string

an object

Outputs

n/f

an object

Definition

USING: kernel sequences ;

IN: txon.private

: find-` ( string -- n/f )
    dup ?first 96 = [ drop 0 ] [ (find-`) ] if ;