--- gforth/engine/support.c	2007/04/15 20:33:46	1.24
+++ gforth/engine/support.c	2007/04/22 22:04:28	1.25
@@ -409,7 +409,7 @@ Cell to_float(Char *c_addr, UCell u, Flo
 }
 #endif
 
-#ifdef HAS_FLOAT
+#ifdef HAS_FLOATING
 Float v_star(Float *f_addr1, Cell nstride1, Float *f_addr2, Cell nstride2, UCell ucount)
 {
   Float r;