Added meta loop in call to function scheduled in meta mode

darcs-hash:20040311091650-19929-368c01a1f3296b661cc067d2fbccf1b21e9b2a42.gz

1 files changed, 3 insertions, 1 deletions

diff --git a/Carpet/Carpet/src/CallFunction.cc b/Carpet/Carpet/src/CallFunction.cc
index e06a8669d..a844c8874 100644
--- a/Carpet/Carpet/src/CallFunction.cc
+++ b/Carpet/Carpet/src/CallFunction.cc
@@ -11,7 +11,7 @@
 #include "carpet.hh"
   
 extern "C" {
-  static const char* rcsid = "$Header: /home/eschnett/C/carpet/Carpet/Carpet/Carpet/src/CallFunction.cc,v 1.14 2004/01/25 14:57:27 schnetter Exp $";
+  static const char* rcsid = "$Header: /home/eschnett/C/carpet/Carpet/Carpet/Carpet/src/CallFunction.cc,v 1.15 2004/03/11 10:16:50 cott Exp $";
   CCTK_FILEVERSION(Carpet_Carpet_CallFunction_cc);
 }
 
@@ -40,8 +40,10 @@ namespace Carpet {
         assert (is_meta_mode());
         Checkpoint ("Meta mode call at %s to %s::%s",
                     attribute->where, attribute->thorn, attribute->routine);
+	BEGIN_META_MODE(cgh) {
         const int res = CCTK_CallFunction (function, attribute, data);
         assert (res==0);
+	} END_META_MODE;
       }
       
     } else if (attribute->global || is_global_mode()) {