bin-float>base ( n base -- str )

Vocabulary

math.parser.private

Inputs

n	an object
base	an object

Outputs

str

an object

Definition

USING: combinators kernel math.parser ;

IN: math.parser.private

: bin-float>base ( n base -- str )
    {
        { 16 [ [ float>hex-value ] swap (bin-float>base) ] }
        { 8 [ [ float>oct-value ] swap (bin-float>base) ] }
        { 2 [ [ float>bin-value ] swap (bin-float>base) ] }
        [ invalid-radix ]
    } case ;