Let's try (:-):

\ SIMPLE FLOATS INPUT TEST

bl parse  0.000000e0 >float . fs.

bl parse  9.999000e0 >float . fs.
bl parse -9.999000e0 >float . fs.
bl parse  9.999000e9 >float . fs.
bl parse -9.999000e9 >float . fs.

bl parse  9.999000e+0 >float . fs.
bl parse -9.999000e+0 >float . fs.
bl parse  9.999000e-0 >float . fs.
bl parse -9.999000e-0 >float . fs.

bl parse  9.999000e+00 >float . fs.
bl parse -9.999000e+00 >float . fs.
bl parse  9.999000e-00 >float . fs.
bl parse -9.999000e-00 >float . fs.

bl parse  9.999000e+30 >float . fs.
bl parse -9.999000e+30 >float . fs.
bl parse  9.999000e-30 >float . fs.
bl parse -9.999000e-30 >float . fs.

bl parse  0.000000e0 >float . fs.
bl parse  0.000099e+31 >float . fs.
bl parse -0.000099e+31 >float . fs.
bl parse  0.000099e-31 >float . fs.
bl parse -0.000099e-31 >float . fs.

bl parse  1.000077e+24 >float . fs.
bl parse -1.000077e+24 >float . fs.
bl parse  1.000077e-24 >float . fs.
bl parse -1.000077e-24 >float . fs.

bl parse  1.234567e0 >float . fs.
bl parse -1.234567e0 >float . fs.
bl parse  1.234567e-0 >float . fs.
bl parse -1.234567e-0 >float . fs.
bl parse  1.234567e+0 >float . fs.
bl parse -1.234567e+0 >float . fs.
bl parse  1.234567e-00 >float . fs.
bl parse -1.234567e+00 >float . fs.

bl parse  1.234567e30 >float . fs.
bl parse -1.234567e30 >float . fs.
bl parse  1.234567e+30 >float . fs.
bl parse -1.234567e+30 >float . fs.
bl parse  1.234567e-30 >float . fs.
bl parse -1.234567e-30 >float . fs.

bl parse  9.999999e+30 >float . fs.
bl parse -9.999999e+30 >float . fs.
bl parse  9.999999e-30 >float . fs.
bl parse -9.999999e-30 >float . fs.


------------------------------------------------------------------------------
Start uncovering the many advantages of virtual appliances
and start using them to simplify application deployment and
accelerate your shift to cloud computing.
http://p.sf.net/sfu/novell-sfdev2dev
_______________________________________________
Amforth-devel mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to