diff options
author | tradke <tradke@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2000-07-26 02:32:50 +0000 |
---|---|---|
committer | tradke <tradke@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2000-07-26 02:32:50 +0000 |
commit | 89da3588c8551a9d41a73e8fedaf98a2fd1d8b2e (patch) | |
tree | 892acd7b844a8af081223560169c3fdcab04bf66 /src/WriteInfo.c | |
parent | 5ef5219e049640848f134969fec13edf850606c7 (diff) |
Fixed wrong Info output (BR CactusBase-408).
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOBasic/trunk@64 b589c3ab-70e8-4b4d-a09f-cba2dd200880
Diffstat (limited to 'src/WriteInfo.c')
-rw-r--r-- | src/WriteInfo.c | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/WriteInfo.c b/src/WriteInfo.c index 504b7a9..326f66f 100644 --- a/src/WriteInfo.c +++ b/src/WriteInfo.c @@ -20,10 +20,10 @@ #include "CactusBase/IOUtil/src/ioGH.h" int IOBasic_WriteInfo (cGH *GH, - CCTK_REAL *val, - int index, - const char *operator, - const char *alias) + CCTK_REAL *val, + int index, + const char *operator, + const char *alias) { int ierr; int reduce_handle; @@ -37,7 +37,7 @@ int IOBasic_WriteInfo (cGH *GH, fullname = CCTK_FullName (index); CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING, "IOBasic_WriteInfo: No info output for '%s' (no storage)", - fullname); + fullname); free (fullname); return -3; } @@ -46,13 +46,13 @@ int IOBasic_WriteInfo (cGH *GH, if (reduce_handle > -1) { - ierr = CCTK_Reduce(GH,0,reduce_handle,1, - CCTK_VARIABLE_REAL,val,1,index); + ierr = CCTK_Reduce(GH, 0, reduce_handle, 1, CCTK_VARIABLE_REAL, val, + 1, index); if (ierr < 0) { CCTK_VWarn(1, __LINE__, __FILE__, CCTK_THORNSTRING, - "IOBasic_WriteInfo: Internal error in reduction '%s'", - operator); + "IOBasic_WriteInfo: Internal error in reduction '%s'", + operator); retval = -2; } } @@ -60,7 +60,7 @@ int IOBasic_WriteInfo (cGH *GH, { CCTK_VWarn(1, __LINE__, __FILE__, CCTK_THORNSTRING, "IOBasic_WriteInfo: Reduction operator '%s' not found", - operator); + operator); retval = -1; } |