fast-string? ( string encoding -- ? )

Vocabulary

alien.strings.private

Inputs

string	an object
encoding	an object

Outputs

?

an object

Definition

USING: accessors io.encodings.ascii io.encodings.utf8 kernel
sequences ;

IN: alien.strings.private

: fast-string? ( string encoding -- ? )
    swap aux>> not [ { ascii utf8 } member-eq? ] [ drop f ] if ;
    inline