diff options
author | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2002-04-03 12:19:47 +0000 |
---|---|---|
committer | goodale <goodale@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2002-04-03 12:19:47 +0000 |
commit | d8ab835a5efc3206b9a3cab45a86b14f0a4fa447 (patch) | |
tree | 2601b3ed1d67b67ece758bb02bbeb6c1dd75cc71 /src/main/Groups.c | |
parent | aa82c4848bbfcb6c60f8eb31fb506d6c01434f1a (diff) |
Allow implementation name for fully qualified parameter names when setting array sizes.
Tom
git-svn-id: http://svn.cactuscode.org/flesh/trunk@2687 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/main/Groups.c')
-rw-r--r-- | src/main/Groups.c | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/main/Groups.c b/src/main/Groups.c index 886624cf..657dec15 100644 --- a/src/main/Groups.c +++ b/src/main/Groups.c @@ -21,6 +21,7 @@ #include "cctk_Groups.h" #include "cctk_Parameter.h" #include "cctk_Types.h" +#include "cctk_ActiveThorns.h" #include "cctki_Stagger.h" #include "cctki_Groups.h" @@ -2349,7 +2350,15 @@ static int IntParameterEvaluator(int nvars, } else { - use_thorn = thorn; + /* FIXME: need to be a bit more careful here. */ + if (CCTK_IsImplementationActive (thorn)) + { + use_thorn = CCTK_ActivatingThorn (thorn); + } + else + { + use_thorn = thorn; + } use_param = param; } |