Update of /cvsroot/win32forth/win32forth/src
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv23088/win32forth/src
Modified Files:
FLOAT.F
Log Message:
gah: modified _float-number, to reset float?
Index: FLOAT.F
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/FLOAT.F,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** FLOAT.F 26 Apr 2005 19:56:49 -0000 1.2
--- FLOAT.F 30 Apr 2005 15:13:29 -0000 1.3
***************
*** 2246,2250 ****
\in-system-ok if postpone fliteral
then
! 2drop
then ;
--- 2246,2250 ----
\in-system-ok if postpone fliteral
then
! 2drop 0 to float?
then ;
***************
*** 2314,2315 ****
--- 2314,2316 ----
end-code
+ |
