ensure-no-false ( n string seq -- n string seq )

Vocabulary

modern

Inputs

n	an object
string	an object
seq	an object

Outputs

n	an object
string	an object
seq	an object

Definition

USING: kernel math sequences ;

IN: modern

: ensure-no-false ( n string seq -- n string seq )
    dup [ length 0 > ] all?
    [ [ length ] keep expected-length-tokens ] unless ;