gforth/arch/generic/machine.h - diff

Return to machine.h CVS log

Up to [gforth] / gforth / arch / generic

-version 1.1, 1997/09/01 23:08:23
+version 1.3, 1998/10/25 23:15:47
  Line 21
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  */
- /* define this if IEEE singles and doubles are available as C data types */
+ /* define SYSCALL */
- #define IEEE_FP
- /* the IEEE types are used only for loading and storing */
+ #ifndef SYSCALL
- /* the IEEE double precision type */
+ #define SYSCALL
- typedef double DFloat;
+ #endif
- /* the IEEE single precision type */
- typedef float SFloat;
  #ifndef USE_FTOS
  #ifndef USE_NO_FTOS
- Line 49  typedef float SFloat;
+ Line 46  typedef float SFloat;
     we could not use this file in the other machine.h files */
  #endif
+ /* Types: these types are used as Forth's internal types */
+ /* define this if IEEE singles and doubles are available as C data types */
+ #define IEEE_FP
+ /* the IEEE types are used only for loading and storing */
+ /* the IEEE double precision type */
+ typedef double DFloat;
+ /* the IEEE single precision type */
+ typedef float SFloat;
+ typedef CELL_TYPE Cell;
+ typedef unsigned CELL_TYPE UCell;
+ typedef Cell Bool;
+ typedef unsigned char Char;
+ typedef double Float;
+ typedef Char *Address;
+ #if defined(DOUBLY_INDIRECT)
+ typedef void **Label;
+ #else /* !defined(DOUBLY_INDIRECT) */
+ typedef void *Label;
+ #endif /* !defined(DOUBLY_INDIRECT) */