Return to engine.c CVS log | Up to [gforth] / gforth |
version 1.25, 1995/04/06 16:56:09 | version 1.26, 1995/04/20 09:42:47 |
---|---|
Line 166 char *cstr(Char *from, UCell size, int c | Line 166 char *cstr(Char *from, UCell size, int c |
#define rint(x) floor((x)+0.5) | #define rint(x) floor((x)+0.5) |
#endif | #endif |
static char* fileattr[6]={"r","rb","r+","r+b","w+","w+b"}; | static char* fileattr[6]={"r","rb","r+","r+b","w","wb"}; |
static Address up0=NULL; | static Address up0=NULL; |