From 7cbf491e29cb9c2cfa3fbbd232f48a51cfaebff4 Mon Sep 17 00:00:00 2001 From: "M. Scot Breitenfeld" Date: Thu, 22 Sep 2016 17:19:48 -0500 Subject: misc. format code-cleanup --- fortran/src/H5match_types.c | 6 ------ 1 file changed, 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 0) /* Found the integer type */ { -- cgit v0.12