math.parser: with-radix-char quot shouldn't get called with ``f``.
parent
cd6ccdadc3
commit
33a62c7f9d
|
@ -240,7 +240,6 @@ DEFER: @neg-digit
|
||||||
{ CHAR: b [ drop 2 ->radix require-next-digit ] }
|
{ CHAR: b [ drop 2 ->radix require-next-digit ] }
|
||||||
{ CHAR: o [ drop 8 ->radix require-next-digit ] }
|
{ CHAR: o [ drop 8 ->radix require-next-digit ] }
|
||||||
{ CHAR: x [ drop 16 ->radix require-next-digit ] }
|
{ CHAR: x [ drop 16 ->radix require-next-digit ] }
|
||||||
{ f [ 3drop 2drop 0 ] }
|
|
||||||
[ [ drop ] 2dip swap call ]
|
[ [ drop ] 2dip swap call ]
|
||||||
} case
|
} case
|
||||||
] 2curry next-digit ; inline
|
] 2curry next-digit ; inline
|
||||||
|
|
Loading…
Reference in New Issue