From 2a2bc809872a30715ad81e71a5df24263b2523de Mon Sep 17 00:00:00 2001 From: Scott Wegner Date: Mon, 20 Oct 2008 09:34:40 -0500 Subject: [svn-r15903] Purpose: Fix Windows compiler error Description: Visual Studio compiler was complaining because variables were declared mid-function, when they should be declared at the top. This checkin simply moves the declarations to the top. Tested: Simple edit, VS2005 only --- fortran/src/H5match_types.c | 9 +++++---- 1 file changed, 5 insertions(+), 4 deletions(-) diff --git a/fortran/src/H5match_types.c b/fortran/src/H5match_types.c index 1e0c5dc..034ff72 100644 --- a/fortran/src/H5match_types.c +++ b/fortran/src/H5match_types.c @@ -136,10 +136,6 @@ void writeFloatToFiles(const char* fortran_type, const char* c_type, unsigned in int main() { - /* Open target files */ - c_header = fopen(CFILE, "w"); - fort_header = fopen(FFILE, "w"); - int FoundIntSize[4]; int FoundRealSize[4]; int i,j,flag; @@ -147,6 +143,11 @@ int main() int H5_C_HAS_REAL_NATIVE_16; int H5_C_HAS_REAL_NATIVE_12; + /* Open target files */ + c_header = fopen(CFILE, "w"); + fort_header = fopen(FFILE, "w"); + + /* Default is C has 16 byte float */ H5_C_HAS_REAL_NATIVE_16 = 1; /* Default is C has 12 byte float */ -- cgit v0.12