?make-ratio ( num denom/f -- ratio/f )

Vocabulary

math.parser.private

Inputs

num	an object
denom/f	an object

Outputs

ratio/f

an object

Definition

USING: kernel math ;

IN: math.parser.private

: ?make-ratio ( num denom/f -- ratio/f )
    [ dup 0 = [ 2drop f ] [ / ] if ] [ drop f ] if* ; inline