non-negative-fixnum? ( obj -- ? )

Vocabulary

compiler.tree.propagation.transforms

Inputs

obj

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit math ;

IN: compiler.tree.propagation.transforms

: non-negative-fixnum? ( obj -- ? )
    { [ fixnum? ] [ 0 >= ] } 1&& ;