math.parser: only allow 10 and 16 base for float>base.
parent
45e2b697be
commit
9dbeef4933
|
@ -408,7 +408,8 @@ M: ratio >base
|
||||||
: float>base ( n base -- str )
|
: float>base ( n base -- str )
|
||||||
{
|
{
|
||||||
{ 16 [ float>hex ] }
|
{ 16 [ float>hex ] }
|
||||||
[ drop "%.16g" format-float ]
|
{ 10 [ "%.16g" format-float ] }
|
||||||
|
[ "Invalid base" throw ]
|
||||||
} case ; inline
|
} case ; inline
|
||||||
|
|
||||||
PRIVATE>
|
PRIVATE>
|
||||||
|
|
Loading…
Reference in New Issue