[SCM] Gerris Flow Solver branch, upstream, updated. b3aa46814a06c9cb2912790b23916ffb44f1f203

Stephane Popinet popinet at users.sf.net
Fri May 15 02:55:59 UTC 2009


The following commit has been merged in the upstream branch:
commit 247b03b1e6e4307b9e67989734e754886054d6e9
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Thu Jan 15 14:08:30 2009 +1100

    stderr and stdout are muted in parallel
    
    darcs-hash:20090115030830-d4795-b04d3013c3f25a7a011176edaa1a8945b4879c01.gz

diff --git a/src/output.c b/src/output.c
index c60803e..b1dfaea 100644
--- a/src/output.c
+++ b/src/output.c
@@ -239,13 +239,13 @@ static void gfs_output_read (GtsObject ** o, GtsFile * fp)
     output->format = g_strdup (fp->token->str);
     gts_file_next_token (fp);
     
-    if (!strcmp (output->format, "stderr")) {
-      output->file = gfs_output_file_open ("stderr", "w");
-      return;
-    }
-    
-    if (!strcmp (output->format, "stdout")) {
-      output->file = gfs_output_file_open ("stdout", "w");
+    if (!strcmp (output->format, "stderr") || !strcmp (output->format, "stdout")) {
+      if (GFS_DOMAIN (gfs_object_simulation (output))->pid > 0)
+	gfs_output_mute (output);
+      else {
+	g_assert (!output->file);
+	output->file = gfs_output_file_open (output->format, "w");
+      }
       return;
     }
     

-- 
Gerris Flow Solver



More information about the debian-science-commits mailing list