next-odd ( m -- n )

Vocabulary

math.bitwise

Inputs

m

an object

Outputs

n

an object

Definition

USING: kernel math ;

IN: math.bitwise

: next-odd ( m -- n ) dup even? [ 1 + ] [ 2 + ] if ;
    foldable flushable