From 5ef5219e049640848f134969fec13edf850606c7 Mon Sep 17 00:00:00 2001
From: allen <allen@b589c3ab-70e8-4b4d-a09f-cba2dd200880>
Date: Wed, 19 Jul 2000 12:20:56 +0000
Subject: 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
---
 src/Write.c | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

(limited to 'src/Write.c')

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;
   }
-- 
cgit v1.2.3