Return to support.c CVS log | Up to [gforth] / gforth / engine |
version 1.24, 2007/04/15 20:33:46 | version 1.25, 2007/04/22 22:04:28 |
---|---|
Line 409 Cell to_float(Char *c_addr, UCell u, Flo | Line 409 Cell to_float(Char *c_addr, UCell u, Flo |
} | } |
#endif | #endif |
#ifdef HAS_FLOAT | #ifdef HAS_FLOATING |
Float v_star(Float *f_addr1, Cell nstride1, Float *f_addr2, Cell nstride2, UCell ucount) | Float v_star(Float *f_addr1, Cell nstride1, Float *f_addr2, Cell nstride2, UCell ucount) |
{ | { |
Float r; | Float r; |