Diff for /gforth/Attic/hppa.h between versions 1.4 and 1.5

version 1.4, 1994/11/29 16:22:39 version 1.5, 1994/12/12 17:10:39
Line 4 Line 4
   
   This is the machine-specific part for a HPPA running HP-UX    This is the machine-specific part for a HPPA running HP-UX
 */  */
 /* cache flush stuff */  
   
   #ifndef INDIRECT_THREADED
   #ifndef DIRECT_THREADED
   #define DIRECT_THREADED
   #endif
   #endif
   
   /* cache flush stuff */
 #ifdef DIRECT_THREADED  #ifdef DIRECT_THREADED
   
 extern void * cacheflush(void *, int, int);  extern void * cacheflush(void *, int, int);
Line 21  extern void * cacheflush(void *, int, in Line 27  extern void * cacheflush(void *, int, in
 #  endif  #  endif
 #endif  #endif
   
   #include "32bit.h"
 /* Cell and UCell must be the same size as a pointer */  
 typedef long Cell;  
 typedef unsigned long UCell;  
   
 /* DCell and UDCell must be twice as large as Cell */  
 typedef long long DCell;  
 typedef unsigned long long UDCell;  
   
 /* 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;  
   
 /* define this if the least-significant byte is at the largets address */  
 #define BIG_ENDIAN  
   
 #ifdef DIRECT_THREADED  #ifdef DIRECT_THREADED
         /* PFA gives the parameter field address corresponding to a cfa */          /* PFA gives the parameter field address corresponding to a cfa */
Line 236  typedef float SFloat; Line 223  typedef float SFloat;
         /* this stores a call dodoes at addr */          /* this stores a call dodoes at addr */
 #endif  #endif
   
 /* OS dependences */  
   
 #define SEEK_SET 0  
 #define rint(x) floor((x)+0.5)  
   
   

Removed from v.1.4  
changed lines
  Added in v.1.5


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