check-status ( status -- status )

Vocabulary

gemini.private

Inputs

status

an object

Outputs

status

an object

Definition

USING: kernel math sequences ;

IN: gemini.private

: check-status ( status -- status )
    dup length 1 > [ invalid-status ] unless ;