Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv9842/src
Modified Files:
FLOAT.F
Log Message:
Float.f: Major changes to make mutch more readable and shorter. Also fixed a lot of wrong stack coments.
Note: A lot of the stack operators still should optimized without using the FPU.
Index: FLOAT.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/FLOAT.F,v
retrieving revision 1.4
retrieving revision 1.5
diff -C2 -d -r1.4 -r1.5
*** FLOAT.F 1 May 2005 06:27:41 -0000 1.4
--- FLOAT.F 14 May 2005 11:37:11 -0000 1.5
***************
*** 3,10 ****
--- 3,14 ----
\ Modified substantially by R. Smith
+ \ Floating point values are maintained on a separate stack.
+ \ Major changes by rls to convert to a software stack
+
\ ------------------- Bug Fix Log -----------------------------------------
\ rls 09-21-97 Bug fixes for FTANH and E by itself.
\ rls 09-30-97 correction to restore change by SMuB, which we don't have a
\ comment to explain
[...2925 lines suppressed...]
*** 2213,2216 ****
--- 2238,2247 ----
\ changed arm 25/04/2005 23:09:50 to use new number chain technique (see numconv.f)
+ internal
+
+ 0 value float?
+
+ external
+
: FLOAT-NUMBER? ( a1 n1 -- d ) \ input parameters
\ floating point number should only be accepted if we are in DECIMAL
***************
*** 2314,2316 ****
--- 2345,2348 ----
end-code
+
|