Return to engine.c CVS log | Up to [gforth] / gforth |
version 1.20, 1994/12/12 17:10:35 | version 1.21, 1994/12/15 12:35:14 |
---|---|
Line 122 char *cstr(Char *from, UCell size, int c | Line 122 char *cstr(Char *from, UCell size, int c |
#define NEWLINE '\n' | #define NEWLINE '\n' |
#ifndef HAVE_RINT | |
#define rint(x) floor((x)+0.5) | |
#endif | |
static char* fileattr[6]={"r","rb","r+","r+b","w+","w+b"}; | static char* fileattr[6]={"r","rb","r+","r+b","w+","w+b"}; |