Update of /cvsroot/win32forth/win32forth/src/kernel
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv18885/win32forth/src/kernel
Modified Files:
meta-compiler.f
Log Message:
gah: modified to work with hidden float?
Index: meta-compiler.f
===================================================================
RCS file: /cvsroot/win32forth/win32forth/src/kernel/meta-compiler.f,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** meta-compiler.f 26 Apr 2005 19:56:50 -0000 1.3
--- meta-compiler.f 14 May 2005 12:36:49 -0000 1.4
***************
*** 765,770 ****
if false else
double? abort" Doubles not supported in meta-compiler"
float? abort" Floats not supported in metacompiler"
! drop true then ;
\ ======================================================================
--- 765,772 ----
if false else
double? abort" Doubles not supported in meta-compiler"
+ [ also hidden ]
float? abort" Floats not supported in metacompiler"
! [ previous ]
! drop true then ;
\ ======================================================================
***************
*** 819,820 ****
--- 821,823 ----
+ |
