Handbook
Glossary
add-mantissa-digit ( float-parse i number-parse n digit quot -- float-parse' n/f )
Vocabulary
math.parser.private
Inputs
float-parse
an
object
i
an
object
number-parse
an
object
n
an
object
digit
an
object
quot
an
object
Outputs
float-parse'
an
object
n/f
an
object
Definition
USING:
kernel
;
IN:
math.parser.private
:
add-mantissa-digit
( float-parse i number-parse n digit quot -- float-parse' n/f )
[
(add-digit)
dup
[
inc-point-?dec-magnitude
]
curry
3dip
]
dip
next-digit
;
inline