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

[Stephane Popinet]

The following commit has been merged in the upstream branch:
commit 0f493c3e59c1b27e3e3003c856b8c595a9a40c73
Author: Stephane Popinet <s.popinet at niwa.co.nz>
Date:   Tue Jul 5 08:51:04 2005 +1000

    VOF scheme was not allocating temporary variable
    
    darcs-hash:20050704225104-fbd8f-664d25d14d17d9c0153b464bb5820f572fdbf1f2.gz

diff --git a/src/vof.c b/src/vof.c
index 5a74cf6..77b66da 100644
--- a/src/vof.c
+++ b/src/vof.c
@@ -585,6 +585,7 @@ void gfs_tracer_vof_advection (GfsDomain * domain,
     gfs_domain_cell_traverse (domain, FTT_PRE_ORDER, FTT_TRAVERSE_LEAFS, -1,
 			      (FttCellTraverseFunc) save_previous, data);
   }
+  par->fv = gfs_temporary_variable (domain);
   data[0] = par;
   data[1] = &c1;
   for (c = 0; c < FTT_DIMENSION; c++) {
@@ -601,6 +602,8 @@ void gfs_tracer_vof_advection (GfsDomain * domain,
     gfs_domain_bc (domain, FTT_TRAVERSE_LEAFS, -1, par->v);
   }
   cstart = (cstart + 1) % FTT_DIMENSION;
+  gts_object_destroy (GTS_OBJECT (par->fv));
+  par->fv = NULL;
 
   if (half) {
     data[0] = par->v;

-- 
Gerris Flow Solver