diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2002-01-26 15:48:49 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2002-01-26 15:48:49 (GMT) |
| commit | f7bac2b4b99fcb9a75db66875ce29356a4120b92 (patch) | |
| tree | e80b69f7d285bb62b9d31e2972014053335fb514 /fortran/src | |
| parent | c41e250354fcffaf0459ed5f14fedfabc8f03b4f (diff) | |
| download | hdf5-f7bac2b4b99fcb9a75db66875ce29356a4120b92.zip hdf5-f7bac2b4b99fcb9a75db66875ce29356a4120b92.tar.gz hdf5-f7bac2b4b99fcb9a75db66875ce29356a4120b92.tar.bz2 | |
[svn-r4866]
Purpose:
Maintenance
Description:
Several compiler's warnings caused Hitachi SR8000
F90 and C compilers to fail.
Solution:
Fixed the code to eliminate warnings.
Platforms tested:
O2K (modi4) and Solaris 2.7 (arabica)
Diffstat (limited to 'fortran/src')
| -rw-r--r-- | fortran/src/H5Git.c | 4 | ||||
| -rw-r--r-- | fortran/src/H5_f.c | 2 | ||||
| -rw-r--r-- | fortran/src/H5f90proto.h | 2 |
3 files changed, 4 insertions, 4 deletions
diff --git a/fortran/src/H5Git.c b/fortran/src/H5Git.c index 2998753..b4e41fc 100644 --- a/fortran/src/H5Git.c +++ b/fortran/src/H5Git.c @@ -9,8 +9,8 @@ #include "H5Git.h" #define FALSE 0 -herr_t count_elems(hid_t loc_id, const char *name, void *opdata); -herr_t obj_info(hid_t loc_id, const char *name, void *opdata); +static herr_t count_elems(hid_t loc_id, const char *name, void *opdata); +static herr_t obj_info(hid_t loc_id, const char *name, void *opdata); typedef struct retval { char * name; diff --git a/fortran/src/H5_f.c b/fortran/src/H5_f.c index 83eb113..08c3a9e 100644 --- a/fortran/src/H5_f.c +++ b/fortran/src/H5_f.c @@ -268,7 +268,7 @@ nh5init_flags_c( int_f *h5d_flags, int_f *h5e_flags, int_f *h5f_flags, h5s_flags[1] = H5S_SIMPLE; h5s_flags[2] = H5S_SELECT_SET; h5s_flags[3] = H5S_SELECT_OR; - h5s_flags[4] = H5S_UNLIMITED; + h5s_flags[4] = (int_f)H5S_UNLIMITED; h5s_flags[5] = H5S_ALL; /* diff --git a/fortran/src/H5f90proto.h b/fortran/src/H5f90proto.h index 492eec7..253c819 100644 --- a/fortran/src/H5f90proto.h +++ b/fortran/src/H5f90proto.h @@ -3,7 +3,7 @@ #include "H5Git.h" __DLL__ int HD5c2fstr(char *str, int len); -__DLL__ char * HD5fcstring (_fcd fdesc, int len); +__DLL__ char * HD5f2cstring (_fcd fdesc, int len); __DLL__ int HDpackFstring(char *src, char *dest, int len); /* |