I think there is a bug in the F.R word definition.

        F.R ( n1 n2 — ); ( F: r — )
        Display r with n2 significant digits, right-justified in a field n1
characters wide.

Test
-----
empty requires fpmath

123.456e fconstant xx

: test ( -- )
        cr
        ." 0123456789 123456789"
        cr xx 10 4 F.R
        cr xx 10 5 F.R
        cr xx 10 6 F.R
        cr xx 10 7 F.R ;

Result
-------
test
0123456789 123456789
     123.45600
    123.45600
   123.45600
  123.45600 ok

Regards,
________
Charles Melice
mail_at_forthcad.com

.
Received on Sun May 23 1999 - 11:06:24 PDT