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) |
|
|
|
|
|