diff options
| author | Albert Cheng <acheng@hdfgroup.org> | 2008-11-10 20:13:21 (GMT) |
|---|---|---|
| committer | Albert Cheng <acheng@hdfgroup.org> | 2008-11-10 20:13:21 (GMT) |
| commit | 80c3ed3f33e058c37981f032a0988c26e5cba2e9 (patch) | |
| tree | 6be12ccd3c1b1ed96fe7aec16e9139cfafde08a6 | |
| parent | a008eae3239c3b0a4de7cfccbc93cdcd2ecc2618 (diff) | |
| download | hdf5-80c3ed3f33e058c37981f032a0988c26e5cba2e9.zip hdf5-80c3ed3f33e058c37981f032a0988c26e5cba2e9.tar.gz hdf5-80c3ed3f33e058c37981f032a0988c26e5cba2e9.tar.bz2 | |
[svn-r16054] Fixed a typo in function nh5fclose_c. The error was just a warning in
many other systems but AIX flagged it as an error and failed to complete
the compiling.
Tested: LLNL UP (AIX machine)
| -rw-r--r-- | fortran/src/H5Ff.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5Ff.c b/fortran/src/H5Ff.c index 6b76ba0..0f16b29 100644 --- a/fortran/src/H5Ff.c +++ b/fortran/src/H5Ff.c @@ -397,7 +397,7 @@ nh5fclose_c ( hid_t_f *file_id ) int ret_value = 0; hid_t c_file_id; - c_file_id = (hid_t*)*file_id; + c_file_id = (hid_t)*file_id; if ( H5Fclose(c_file_id) < 0 ) ret_value = -1; return ret_value; } |