diff options
| author | Elena Pourmal <epourmal@hdfgroup.org> | 2000-11-29 23:52:56 (GMT) |
|---|---|---|
| committer | Elena Pourmal <epourmal@hdfgroup.org> | 2000-11-29 23:52:56 (GMT) |
| commit | 49e8b9fab84a2286ffe11269563ee27fd6442bfe (patch) | |
| tree | 2b7943a5a24da92661d16da4d84d7ad582998ac6 /fortran/src/H5ff.f90 | |
| parent | 55bc19a6d7f04822a949cb5c688cec66dc8c844a (diff) | |
| download | hdf5-49e8b9fab84a2286ffe11269563ee27fd6442bfe.zip hdf5-49e8b9fab84a2286ffe11269563ee27fd6442bfe.tar.gz hdf5-49e8b9fab84a2286ffe11269563ee27fd6442bfe.tar.bz2 | |
[svn-r3034]
Purpose:
Bug fix.
Description:
H5f90global.f90:
One of the common block arrays (floating_types) had a typo in the name.
DEC compiler was the only compiler to warn about the problem.
H5Ff.f90
Compiler gave warnings about a variable that was used before its value was defined.
Fixed. Turned to be a typo in a variable name.
Platforms tested:
DEC UNIX (gondolin)
Diffstat (limited to 'fortran/src/H5ff.f90')
| -rw-r--r-- | fortran/src/H5ff.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fortran/src/H5ff.f90 b/fortran/src/H5ff.f90 index 198a616..234c012 100644 --- a/fortran/src/H5ff.f90 +++ b/fortran/src/H5ff.f90 @@ -9,7 +9,7 @@ INTEGER, EXTERNAL :: h5open_c error_0 = h5open_c() error_1 = h5init_types_c(predef_types, floating_types, integer_types) - error_1 = h5init_flags_c(H5D_flags, & + error_2 = h5init_flags_c(H5D_flags, & H5E_flags, & H5F_flags, & H5FD_flags, & |