diff options
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); /* |