[Win32forth-cvs] win32forth/src FLOAT.F,1.4,1.5

[Dirk B. <db...@us...>]

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
  
+