![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to machine.h CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [gforth] / gforth / arch / generic|
Return to machine.h CVS log | Up to [gforth] / gforth / arch / generic |
| version 1.7, 1999/02/06 22:28:22 | version 1.8, 1999/03/20 09:20:32 |
|---|---|
| Line 25 | Line 25 |
| #define THREADING_SCHEME 6 | #define THREADING_SCHEME 6 |
| #endif | #endif |
| #ifdef GFORTH_DEBUGGING | |
| /* schedule the ip update after the rest of the primitive; | |
| never mind speed */ | |
| #undef THREADING_SCHEME | |
| #ifdef DIRECT_THREADED | |
| #define THREADING_SCHEME 10 | |
| #else | |
| #define THREADING_SCHEME 8 | |
| #endif /* DIRECT_THREADED */ | |
| #endif /* GFORTH_DEBUGGING */ | |
| /* define SYSCALL */ | /* define SYSCALL */ |
| #ifndef SYSCALL | #ifndef SYSCALL |