version 1.5, 2002/08/21 08:58:37
|
version 1.7, 2003/08/25 08:02:59
|
Line 1
|
Line 1
|
/* vm interpreter wrapper |
/* vm interpreter wrapper |
|
|
Copyright (C) 2001 Free Software Foundation, Inc. |
Copyright (C) 2001,2002 Free Software Foundation, Inc. |
|
|
This file is part of Gforth. |
This file is part of Gforth. |
|
|
Line 163 enum {
|
Line 163 enum {
|
}; |
}; |
#endif |
#endif |
|
|
|
#if defined(__GNUC__) && ((__GNUC__==2 && defined(__GNUC_MINOR__) && __GNUC_MINOR__>=7)||(__GNUC__>2)) |
|
#define MAYBE_UNUSED __attribute__((unused)) |
|
#else |
|
#define MAYBE_UNUSED |
|
#endif |
|
|
/* the return type can be anything you want it to */ |
/* the return type can be anything you want it to */ |
long engine(Cell *ip0, Cell *sp, char *fp) |
long engine(Cell *ip0, Cell *sp, char *fp) |
{ |
{ |