diff options
| author | James Laird <jlaird@hdfgroup.org> | 2005-05-03 22:05:56 (GMT) |
|---|---|---|
| committer | James Laird <jlaird@hdfgroup.org> | 2005-05-03 22:05:56 (GMT) |
| commit | b0f2e2a64f4eb77d8f2eccf12519fe609e0682ef (patch) | |
| tree | 088250d7c6a486f05cd0e7cfd02e1e17b445ff2c /fortran | |
| parent | 9d3222d00fd09b0a69030c7f3746eacaf620369c (diff) | |
| download | hdf5-b0f2e2a64f4eb77d8f2eccf12519fe609e0682ef.zip hdf5-b0f2e2a64f4eb77d8f2eccf12519fe609e0682ef.tar.gz hdf5-b0f2e2a64f4eb77d8f2eccf12519fe609e0682ef.tar.bz2 | |
[svn-r10722] Purpose:
Bug fix
Description:
Forgot to check in new version of H5match_types.c that uses long_long
instead of long long.
Platforms tested:
mir, modi4, pommier
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5match_types.c | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/fortran/src/H5match_types.c b/fortran/src/H5match_types.c index 6a4a930..cfa6f87 100644 --- a/fortran/src/H5match_types.c +++ b/fortran/src/H5match_types.c @@ -114,8 +114,8 @@ int main() initFfile(); /* First, define c_int_x */ - if(sizeof(long long) == 1) - writeTypedef("long long", 1); + if(sizeof(long_long) == 1) + writeTypedef("long_long", 1); else if(sizeof(long) == 1) writeTypedef("long", 1); else if(sizeof(int) == 1) @@ -128,8 +128,8 @@ int main() * But if char isn't, then nothing is, so this * is as close as we can get. */ - if(sizeof(long long) == 2) - writeTypedef("long long", 2); + if(sizeof(long_long) == 2) + writeTypedef("long_long", 2); else if(sizeof(long) == 2) writeTypedef("long", 2); else if(sizeof(int) == 2) @@ -139,8 +139,8 @@ int main() else writeTypedefDefault(2); - if(sizeof(long long) == 4) - writeTypedef("long long", 4); + if(sizeof(long_long) == 4) + writeTypedef("long_long", 4); else if(sizeof(long) == 4) writeTypedef("long", 4); else if(sizeof(int) == 4) @@ -150,8 +150,8 @@ int main() else writeTypedefDefault(4); - if(sizeof(long long) == 8) - writeTypedef("long long", 8); + if(sizeof(long_long) == 8) + writeTypedef("long_long", 8); else if(sizeof(long) == 8) writeTypedef("long", 8); else if(sizeof(int) == 8) |