diff options
| author | Quincey Koziol <koziol@hdfgroup.org> | 2009-06-18 18:37:49 (GMT) |
|---|---|---|
| committer | Quincey Koziol <koziol@hdfgroup.org> | 2009-06-18 18:37:49 (GMT) |
| commit | ed7658df795092d7bd50705cae4319adb5985289 (patch) | |
| tree | 78f3a1eb1e2fc5da697be2655b2f824710e5a6e1 /fortran | |
| parent | 879d58b86bacd743e75d78bed2c54f549aeb0a9d (diff) | |
| download | hdf5-ed7658df795092d7bd50705cae4319adb5985289.zip hdf5-ed7658df795092d7bd50705cae4319adb5985289.tar.gz hdf5-ed7658df795092d7bd50705cae4319adb5985289.tar.bz2 | |
[svn-r17085] Description:
Bring r17002:17084 from trunk to revise_chunks branch.
Tested on:
FreeBSD/32 6.3 (duty) in debug mode
FreeBSD/64 6.3 (liberty) w/C++ & FORTRAN, in debug mode
Linux/32 2.6 (jam) w/PGI compilers, w/C++ & FORTRAN, w/threadsafe,
in debug mode
Linux/64-amd64 2.6 (smirom) w/Intel compilers w/default API=1.6.x,
w/C++ & FORTRAN, in production mode
Solaris/32 2.10 (linew) w/deprecated symbols disabled, w/C++ & FORTRAN,
w/szip filter, in production mode
Linux/64-ia64 2.6 (cobalt) w/Intel compilers, w/C++ & FORTRAN,
in production mode
Linux/64-ia64 2.4 (tg-login3) w/parallel, w/FORTRAN, in debug mode
Linux/64-amd64 2.6 (abe) w/parallel, w/FORTRAN, in production mode
Mac OS X/32 10.5.7 (amazon) in debug mode
Mac OS X/32 10.5.7 (amazon) w/C++ & FORTRAN, w/threadsafe,
in production mode
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5match_types.c | 14 | ||||
| -rw-r--r-- | fortran/src/Makefile.in | 2 |
2 files changed, 8 insertions, 8 deletions
diff --git a/fortran/src/H5match_types.c b/fortran/src/H5match_types.c index 091d0c8..d6b7a85 100644 --- a/fortran/src/H5match_types.c +++ b/fortran/src/H5match_types.c @@ -102,13 +102,13 @@ endFfile(void) /* Define a c_int_x type in the C header */ void writeTypedef(const char* c_type, unsigned int size) { - fprintf(c_header, "#define c_int_%d %s\n", size, c_type); + fprintf(c_header, "#define c_int_%u %s\n", size, c_type); } /* Define a c_float_x type in the C header */ void writeFloatTypedef(const char* c_type, unsigned int size) { - fprintf(c_header, "#define c_float_%d %s\n", size, c_type); + fprintf(c_header, "#define c_float_%u %s\n", size, c_type); } /* Call this function if there is no matching C type for sizes > 1 */ @@ -116,22 +116,22 @@ void writeTypedefDefault(unsigned int size) { assert(size %2 == 0); - fprintf(c_header, "typedef struct {c_int_%d a; c_int_%d b;} c_int_%d\n", size / 2, size / 2, size); + fprintf(c_header, "typedef struct {c_int_%u a; c_int_%u b;} c_int_%u\n", size / 2, size / 2, size); } /* Create matching Fortran and C types by writing to both files */ void writeToFiles(const char* fortran_type, const char* c_type, unsigned int size) { - fprintf(fort_header, " INTEGER, PARAMETER :: %s = %d\n", fortran_type, size); - fprintf(c_header, "typedef c_int_%d %s;\n", size, c_type); + fprintf(fort_header, " INTEGER, PARAMETER :: %s = %u\n", fortran_type, size); + fprintf(c_header, "typedef c_int_%u %s;\n", size, c_type); } /* Create matching Fortran and C floating types by writing to both files */ void writeFloatToFiles(const char* fortran_type, const char* c_type, unsigned int size) { - fprintf(fort_header, " INTEGER, PARAMETER :: %s = %d\n", fortran_type, size); + fprintf(fort_header, " INTEGER, PARAMETER :: %s = %u\n", fortran_type, size); - fprintf(c_header, "typedef c_float_%d %s;\n", size, c_type); + fprintf(c_header, "typedef c_float_%u %s;\n", size, c_type); } int main() diff --git a/fortran/src/Makefile.in b/fortran/src/Makefile.in index fa2d8b6..dabafe1 100644 --- a/fortran/src/Makefile.in +++ b/fortran/src/Makefile.in @@ -389,7 +389,7 @@ CHECK_CLEANFILES = *.chkexe *.chklog *.clog # Add libtool shared library version numbers to the HDF5 library # See libtool versioning documentation online. LT_VERS_INTERFACE = 6 -LT_VERS_REVISION = 30 +LT_VERS_REVISION = 32 LT_VERS_AGE = 0 # Include src directory in both Fortran and C flags (C compiler is used |