diff options
| author | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2016-09-22 22:19:48 (GMT) |
|---|---|---|
| committer | M. Scot Breitenfeld <brtnfld@hdfgroup.org> | 2016-09-22 22:19:48 (GMT) |
| commit | 7cbf491e29cb9c2cfa3fbbd232f48a51cfaebff4 (patch) | |
| tree | edbaf4df72f015508b8da7539579a8451a62d745 /fortran | |
| parent | 3c37126585bbb2f788d6a71449ffbb61efc5141f (diff) | |
| download | hdf5-7cbf491e29cb9c2cfa3fbbd232f48a51cfaebff4.zip hdf5-7cbf491e29cb9c2cfa3fbbd232f48a51cfaebff4.tar.gz hdf5-7cbf491e29cb9c2cfa3fbbd232f48a51cfaebff4.tar.bz2 | |
misc. format code-cleanup
Diffstat (limited to 'fortran')
| -rw-r--r-- | fortran/src/H5match_types.c | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/fortran/src/H5match_types.c b/fortran/src/H5match_types.c index 6f5af49..b19d7b1 100644 --- a/fortran/src/H5match_types.c +++ b/fortran/src/H5match_types.c @@ -175,8 +175,6 @@ int main(void) H5_FORTRAN_NUM_INTEGER_KINDS = (int)(sizeof(IntKinds)/sizeof(IntKinds[0])); H5_FORTRAN_NUM_REAL_KINDS = (int)(sizeof(RealKinds)/sizeof(RealKinds[0])); - - fprintf(fort_header," INTEGER, PARAMETER :: H5_FORTRAN_NUM_INTEGER_KINDS = %d\n", H5_FORTRAN_NUM_INTEGER_KINDS); @@ -347,10 +345,6 @@ int main(void) } - - - - for(i=0;i<H5_FORTRAN_NUM_INTEGER_KINDS;i++) { if( FoundIntSize[i] > 0) /* Found the integer type */ { |