--- gforth/arch/generic/machine.h 1998/12/08 22:02:54 1.5 +++ gforth/arch/generic/machine.h 2003/08/06 09:35:49 1.22 @@ -2,7 +2,7 @@ This is a generic file for 32-bit machines with IEEE FP arithmetic (no VMS). It only supports indirect threading. - Copyright (C) 1995,1998 Free Software Foundation, Inc. + Copyright (C) 1995,1998,1999,2003 Free Software Foundation, Inc. This file is part of Gforth. @@ -18,7 +18,7 @@ You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software - Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. + Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111, USA. */ /* define SYSCALL */ @@ -27,6 +27,10 @@ #define SYSCALL #endif +#ifndef SYSSIGNALS +#define SYSSIGNALS +#endif + #ifndef USE_FTOS #ifndef USE_NO_FTOS /* keep top of FP stack in register. Since most processors have FP @@ -40,10 +44,10 @@ loses on processors with few registers. USE_TOS might be defined in the processor-specific files */ -#ifdef DIRECT_THREADED -/* If you want direct threading, write a .h file for your processor! */ -/* We could put some stuff here that causes a compile error, but then - we could not use this file in the other machine.h files */ +#ifndef INDIRECT_THREADED +#ifndef DIRECT_THREADED +#define DIRECT_THREADED +#endif #endif /* Types: these types are used as Forth's internal types */ @@ -70,7 +74,7 @@ typedef void **Label; typedef void *Label; #endif /* !defined(DOUBLY_INDIRECT) */ -/* feature defines */ +/* feature defines, these setting should be identical to the ones in machpc.fs */ #define HAS_DCOMPS #define HAS_FILE @@ -79,3 +83,10 @@ typedef void *Label; #define HAS_HASH #define HAS_OS #define HAS_XCONDS +#define HAS_STANDARDTHREADING +#define HAS_DEBUG +#ifndef HAS_PEEPHOLE +#define HAS_PEEPHOLE +#endif + +#define RELINFOBITS 8