summaryrefslogtreecommitdiffstats
path: root/fortran/src
diff options
context:
space:
mode:
authorElena Pourmal <epourmal@hdfgroup.org>2005-09-07 16:06:49 (GMT)
committerElena Pourmal <epourmal@hdfgroup.org>2005-09-07 16:06:49 (GMT)
commit181102ff7483d517ecd40e4d6f81a929ca854de3 (patch)
tree6947fcdb07e3c6b27e9645ac4cd587efc5391ef0 /fortran/src
parent436b9db1faf49a3454a97d914d1a15e7571c69ec (diff)
downloadhdf5-181102ff7483d517ecd40e4d6f81a929ca854de3.zip
hdf5-181102ff7483d517ecd40e4d6f81a929ca854de3.tar.gz
hdf5-181102ff7483d517ecd40e4d6f81a929ca854de3.tar.bz2
[svn-r11359] Purpose: Bug fix/maintenance/new feature
Description: Currently we are trying to match excatly Fortran and C types. Unfortunately, some systems (SX-6) provide compiler switches (-ew) that make ALL Fortran types to be at least of size 8. As a result, Fortran library cannot be compiled. Solution: Allow INTEGER(HID_T) type to be 8 bytes if necessary. The values of this type are originated in the C library and can be safely passed back and forth. Please note that we cannot do the same for INTEGER(SIZE_T) type. Fortunately there is a switch that allows size_t be 8 bytes for both C and Fortran compilers. Platforms tested: It is a minor change, therefore SX-6 only; daily tests will do the rest :-) Misc. update:
Diffstat (limited to 'fortran/src')
-rw-r--r--fortran/src/H5match_types.c2
1 files changed, 2 insertions, 0 deletions
diff --git a/fortran/src/H5match_types.c b/fortran/src/H5match_types.c
index 2c11a29..941ad67 100644
--- a/fortran/src/H5match_types.c
+++ b/fortran/src/H5match_types.c
@@ -243,6 +243,8 @@ int main()
writeToFiles("HID_T", "hid_t_f", 2);
#elif defined H5_FORTRAN_HAS_INTEGER_1 && H5_SIZEOF_HID_T >= 1
writeToFiles("HID_T", "hid_t_f", 1);
+#if defined H5_FORTRAN_HAS_INTEGER_8 && H5_SIZEOF_HID_T >= 4
+ writeToFiles("HID_T", "hid_t_f", 8);
#else
/* Error: couldn't find a size for hid_t */
return -1;