diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2001-03-15 18:17:01 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2001-03-15 18:17:01 (GMT) |
commit | 44047587c1d17823b7947652ab1e3ff1f123d7df (patch) | |
tree | eb4c2313b75f299457e1161b1149188d5d6e8a4d /fortran/src | |
parent | ad80cc25ead580b2932f8a9654099ae9fcea8df4 (diff) | |
download | hdf5-44047587c1d17823b7947652ab1e3ff1f123d7df.zip hdf5-44047587c1d17823b7947652ab1e3ff1f123d7df.tar.gz hdf5-44047587c1d17823b7947652ab1e3ff1f123d7df.tar.bz2 |
[svn-r3644]
Purpose:
Port to DEC ALPHA running LINUX
Description:
Added necessary definitions to the fortran header file for LINUX port.
Platforms tested:
DEC ALPHA LINUX and DEC OSF
Diffstat (limited to 'fortran/src')
-rw-r--r-- | fortran/src/H5f90i.h | 33 |
1 files changed, 30 insertions, 3 deletions
diff --git a/fortran/src/H5f90i.h b/fortran/src/H5f90i.h index b19a3c5..c46cf39 100644 --- a/fortran/src/H5f90i.h +++ b/fortran/src/H5f90i.h @@ -147,8 +147,7 @@ typedef float real_f; #endif /*SUN*/ - -#if defined DEC_ALPHA || (defined __alpha && defined __unix__) +#if defined DEC_ALPHA || (defined __alpha && defined __unix__ && !defined __linux__) #ifndef DEC_ALPHA #define DEC_ALPHA @@ -159,7 +158,6 @@ If you get an error on this line more than one machine type has been defined. Please check your Makefile. #endif #define GOT_MACHINE - #include <sys/file.h> /* for unbuffered i/o stuff */ #include <sys/stat.h> #define DF_MT DFMT_ALPHA @@ -175,6 +173,32 @@ typedef float real_f; #endif /* DEC_ALPHA */ +#if defined __alpha__ && defined __linux__ + +#ifndef DEC_ALPHA_LINUX +#define DEC_ALPHA_LINUX +#endif + +#ifdef GOT_MACHINE +If you get an error on this line more than one machine type has been defined. +Please check your Makefile. +#endif +#define GOT_MACHINE + +#include <sys/file.h> /* for unbuffered i/o stuff */ +#include <sys/stat.h> +#define DF_MT DFMT_ALPHA +typedef char *_fcd; +typedef long long hsize_t_f; +typedef long long hssize_t_f; +typedef long long size_t_f; +typedef int int_f; +typedef int hid_t_f; +typedef float real_f; +#define FNAME_POST2_UNDERSCORE +#define _fcdtocp(desc) (desc) + +#endif /* DEC_ALPHA_LINUX */ #if defined(HP9000) || (!defined(__convexc__) && (defined(hpux) || defined(__hpux))) @@ -276,6 +300,9 @@ typedef float real_f; #if !defined(FNAME_PRE_UNDERSCORE) && !defined(FNAME_POST_UNDERSCORE) # define FNAME(x) x #endif +#if !defined(FNAME_PRE_UNDERSCORE) && defined(FNAME_POST2_UNDERSCORE) +# define FNAME(x) x##__ +#endif # define HDfree(p) (free((void*)p)) # define HDmalloc(s) (malloc((size_t)s)) |