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

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit fca4d7d45dd34e2168c11462c17b9e4bc317fa40
Author: Stephane Popinet <popinet at users.sf.net>
Date:   Wed Jan 28 17:26:03 2009 +1100

    Small optimisation for gfs_domain_traverse_merged()
    
    darcs-hash:20090128062603-d4795-6248fa1625ca350306745f56819d6669fff2dad5.gz

diff --git a/src/advection.c b/src/advection.c
index 62ce407..bf98a48 100644
--- a/src/advection.c
+++ b/src/advection.c
@@ -759,10 +759,10 @@ static void traverse_non_merged (FttCell * cell, gpointer * datum)
   else {
     GfsMergedTraverseFunc func = (GfsMergedTraverseFunc) datum[0];
     gpointer data = datum[1];
-    GSList * merged = g_slist_prepend (NULL, cell);
-
-    (* func) (merged, data);
-    g_slist_free (merged);    
+    GSList merged;
+    merged.data = cell;
+    merged.next = NULL;
+    (* func) (&merged, data);
   }
 }
 

-- 
Gerris Flow Solver