Re: Fixed-point math, ANS, DPL and Win32Forth

In article
<b01ea954-46bb-4173-8c2b-feaf4fc19b9e@[EMAIL PROTECTED]
>,
 <m_l_g3@[EMAIL PROTECTED]
> wrote:
>Given that fixed-point math is 3 lines of code in Forth
>((
>10000 constant scale
>: x* scale */ ;
>: x/ scale swap */ ;
>))
>it is quite reasonable to have some built-in support for fixed point
>number input.
>
>Historically, there has been the variable DPL acquiring its value as a
>side efect of number conversion.
>
>For example,
>
>1000 \ single, dpl=-1
>1000. \ double, dpl=0
>10.00 \ double, dpl=2
>
>So,
>1) Why DPL is not in the standard?
>2) Why DPL is not in Win32Forth?
>3) Is there an elegant way to implement fixed-point input in ANS?
>
>I wrote fixed-point number input in ANS Forth, but it takes more lines
>of code than the whole non-ANS (DPL-based) fixed point number support.

I have still DPL in ciforth (ANS, certainly as far as this is concerned.)
After conversion ciforth makes DPL points to where the decimal
point was in the input.
So this is an ANS-compatible use of DPL, and could be added to
the standard.

I can't see why your DPL-based stuff would be non-ANS.

Note: DPL is only pleasant to use if you allow just one point and
no other special characters in input.

<SNIP>

Groetjes Albert

--
-- 
Albert van der Horst, UTRECHT,THE NETHERLANDS
Economic growth -- like all pyramid schemes -- ultimately falters.
albert@[EMAIL PROTECTED]
 &=n http://home.hccnet.nl/a.w.m.van.der.horst