Diff for /gforth/arch/generic/machine.h between versions 1.8 and 1.21

version 1.8, 1999/03/20 09:20:32 version 1.21, 2003/08/04 20:32:35
Line 2 Line 2
   This is a generic file for 32-bit machines with IEEE FP arithmetic (no VMS).    This is a generic file for 32-bit machines with IEEE FP arithmetic (no VMS).
   It only supports indirect threading.    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.    This file is part of Gforth.
   
Line 18 Line 18
   
   You should have received a copy of the GNU General Public License    You should have received a copy of the GNU General Public License
   along with this program; if not, write to the Free Software    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.
 */  */
   
 #ifndef THREADING_SCHEME  
 #define THREADING_SCHEME 6  
 #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
Line 60 Line 44
    loses on processors with few registers. USE_TOS might be defined in     loses on processors with few registers. USE_TOS might be defined in
    the processor-specific files */     the processor-specific files */
   
 #ifdef DIRECT_THREADED  #ifndef INDIRECT_THREADED
 /* If you want direct threading, write a .h file for your processor! */  #ifndef DIRECT_THREADED
 /* We could put some stuff here that causes a compile error, but then  #define DIRECT_THREADED
    we could not use this file in the other machine.h files */  #endif
 #endif  #endif
   
 /* Types: these types are used as Forth's internal types */  /* Types: these types are used as Forth's internal types */
Line 90  typedef void **Label; Line 74  typedef void **Label;
 typedef void *Label;  typedef void *Label;
 #endif /* !defined(DOUBLY_INDIRECT) */  #endif /* !defined(DOUBLY_INDIRECT) */
   
 /* feature defines */  /* feature defines, these setting should be identical to the ones in machpc.fs */
   
 #define HAS_DCOMPS  #define HAS_DCOMPS
 #define HAS_FILE  #define HAS_FILE
Line 99  typedef void *Label; Line 83  typedef void *Label;
 #define HAS_HASH  #define HAS_HASH
 #define HAS_OS  #define HAS_OS
 #define HAS_XCONDS  #define HAS_XCONDS
   #define HAS_STANDARDTHREADING
   #define HAS_DEBUG
   #ifndef HAS_PEEPHOLE
   #define HAS_PEEPHOLE
   #endif
   #if(defined(HAVE_LIBAVCALL) && defined(HAVE_LIBCALLBACK) && defined(HAVE_LIBVACALL) && defined(HAVE_LIBTRAMPOLINE))
   #define HAS_FFCALL
   #endif
   
 #define RELINFOBITS     8  #define RELINFOBITS     8

Removed from v.1.8  
changed lines
  Added in v.1.21


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>