diff options
author | schnetter <schnetter@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2005-12-11 18:10:12 +0000 |
---|---|---|
committer | schnetter <schnetter@578cdeb0-5ea1-4b81-8215-5a3b8777ee0b> | 2005-12-11 18:10:12 +0000 |
commit | 7914bcb41d96ee8ab0213c91ebb763a6f3562fb0 (patch) | |
tree | 3a468f6e524c2af7eedbc867ed41058ac4ec395a | |
parent | 439e26deabd500b51438f552a67e764e82a1e756 (diff) |
Handle CCTK_SCALAR in the same way as CCTK_ARRAY. Previously,
CCTK_SCALAR variables were rejected.
This is most likely just an oversight, since no one so far wanted to
integrate CCTK_SCALAR variables. The change is trivial.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusNumerical/MoL/trunk@103 578cdeb0-5ea1-4b81-8215-5a3b8777ee0b
-rw-r--r-- | src/Registration.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/Registration.c b/src/Registration.c index b037202..8dd4a16 100644 --- a/src/Registration.c +++ b/src/Registration.c @@ -204,6 +204,7 @@ CCTK_INT MoL_RegisterEvolved(CCTK_INT EvolvedIndex, CCTK_INT RHSIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterEvolvedArray(EvolvedIndex, @@ -233,6 +234,7 @@ CCTK_INT MoL_RegisterEvolved(CCTK_INT EvolvedIndex, CCTK_INT RHSIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterEvolvedComplexArray(EvolvedIndex, @@ -323,6 +325,7 @@ CCTK_INT MoL_RegisterConstrained(CCTK_INT ConstrainedIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterConstrainedArray(ConstrainedIndex); @@ -350,6 +353,7 @@ CCTK_INT MoL_RegisterConstrained(CCTK_INT ConstrainedIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterConstrainedComplexArray(ConstrainedIndex); @@ -436,6 +440,7 @@ CCTK_INT MoL_RegisterSaveAndRestore(CCTK_INT SandRIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterSaveAndRestoreArray(SandRIndex); @@ -463,6 +468,7 @@ CCTK_INT MoL_RegisterSaveAndRestore(CCTK_INT SandRIndex) break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterSaveAndRestoreComplexArray(SandRIndex); @@ -535,6 +541,7 @@ CCTK_INT MoL_RegisterEvolvedGroup(CCTK_INT EvolvedGroupIndex, break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterEvolvedArrayGroup(EvolvedGroupIndex, @@ -564,6 +571,7 @@ CCTK_INT MoL_RegisterEvolvedGroup(CCTK_INT EvolvedGroupIndex, break; } case CCTK_ARRAY: + case CCTK_SCALAR: { retval += MoL_RegisterEvolvedComplexArrayGroup(EvolvedGroupIndex, |