diff options
author | Elena Pourmal <epourmal@hdfgroup.org> | 2000-11-17 20:08:37 (GMT) |
---|---|---|
committer | Elena Pourmal <epourmal@hdfgroup.org> | 2000-11-17 20:08:37 (GMT) |
commit | 2bc81f8736c26a40451f1915cb83f830b3781cd2 (patch) | |
tree | fb1c1d1102aba5102f2656481d3ab01705a49375 | |
parent | 9735b6ed76e4fa1061210b6216312374faa5e33a (diff) | |
download | hdf5-2bc81f8736c26a40451f1915cb83f830b3781cd2.zip hdf5-2bc81f8736c26a40451f1915cb83f830b3781cd2.tar.gz hdf5-2bc81f8736c26a40451f1915cb83f830b3781cd2.tar.bz2 |
[svn-r2972]
Purpose:
Bug fix
Description:
HP and AIX compilers did not like duplicate array declarations in
common blocks statements.
Solution:
Removed duplication
Platforms tested:
SP2 and HPUX 11.00
-rw-r--r-- | fortran/src/H5f90global.f90 | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/fortran/src/H5f90global.f90 b/fortran/src/H5f90global.f90 index 6752754..ad815ac 100644 --- a/fortran/src/H5f90global.f90 +++ b/fortran/src/H5f90global.f90 @@ -78,13 +78,13 @@ ! H5T_NATIVE_CHARACTER, & ! H5T_STD_REF_OBJ, & ! H5T_STD_REF_DSETREG - COMMON /PREDEFINED_TYPES/ predef_types(PREDEF_TYPES_LEN) + COMMON /PREDEFINED_TYPES/ predef_types ! COMMON /FLOATING_TYPES/ H5T_IEEE_F32BE, & ! H5T_IEEE_F32LE, & ! H5T_IEEE_F64BE, & ! H5T_IEEE_F64LE - COMMON /FLOATING_TYPES/ floatinig_types(FLOATING_TYPES_LEN) + COMMON /FLOATING_TYPES/ floatinig_types ! ! COMMON /INTEGER_TYPES/ H5T_STD_I8BE, & ! H5T_STD_I8LE, & @@ -102,7 +102,7 @@ ! H5T_STD_U32LE, & ! H5T_STD_U64BE, & ! H5T_STD_U64LE - COMMON /INTEGER_TYPES/ integer_types(INTEGER_TYPES_LEN) + COMMON /INTEGER_TYPES/ integer_types ! ! Fortran flags ! |