diff options
author | allen <allen@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2000-07-19 12:20:56 +0000 |
---|---|---|
committer | allen <allen@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2000-07-19 12:20:56 +0000 |
commit | 5ef5219e049640848f134969fec13edf850606c7 (patch) | |
tree | 34d6f00ec5b9ae1600c7cb25eecb54a815b35faf /src/Write.c | |
parent | 4708b9c442dcf8919a614866d599e8a0a239ebcf (diff) |
Only output scalar's if their values have been successfully
calculated
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOBasic/trunk@63 b589c3ab-70e8-4b4d-a09f-cba2dd200880
Diffstat (limited to 'src/Write.c')
-rw-r--r-- | src/Write.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/Write.c b/src/Write.c index 65be41d..1faa4a0 100644 --- a/src/Write.c +++ b/src/Write.c @@ -40,7 +40,9 @@ void IOBasic_Write (cGH *GH, int index, const char *alias) /* output is done by processor 0 only */ if (CCTK_MyProc (GH) != 0) + { return; + } /* first, check if variable has storage assigned */ if (! CCTK_QueryGroupStorageI (GH, CCTK_GroupIndexFromVarI (index))) @@ -49,7 +51,8 @@ void IOBasic_Write (cGH *GH, int index, const char *alias) fullname = CCTK_FullName (index); CCTK_VWarn (2, __LINE__, __FILE__, CCTK_THORNSTRING, - "No scalar output for '%s' (no storage)", fullname); + "IOBasic_Write: No scalar output for '%s' (no storage)", + fullname); free (fullname); return; } |