diff options
author | schnetter <schnetter@d60812e6-3970-4df4-986e-c251b06effeb> | 2003-10-13 18:07:50 +0000 |
---|---|---|
committer | schnetter <schnetter@d60812e6-3970-4df4-986e-c251b06effeb> | 2003-10-13 18:07:50 +0000 |
commit | 5dbbb70bb9834ed7e67470fe0938df813e756071 (patch) | |
tree | 7b87fb64a643047ff518d4f542d7f3cc6c1e66ca /src/Reduction.c | |
parent | a9bea8d978aec10560ababf0911b26ccb9603fcd (diff) |
Introduce the new Cactus variable type CCTK_INT1.
Extend routines to handle the new type.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusPUGH/PUGHReduce/trunk@44 d60812e6-3970-4df4-986e-c251b06effeb
Diffstat (limited to 'src/Reduction.c')
-rw-r--r-- | src/Reduction.c | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/src/Reduction.c b/src/Reduction.c index 30ddfd5..7ca59a0 100644 --- a/src/Reduction.c +++ b/src/Reduction.c @@ -569,6 +569,18 @@ static int copy_real_to_outtype (int num_elems, _outarray[i] = (CCTK_INT) inarray[i]; } } +#ifdef CCTK_INT1 + else if (outtype == CCTK_VARIABLE_INT1) + { + CCTK_INT1 *_outarray = (CCTK_INT1 *) outarray; + + + for (i = 0; i < num_elems; i++) + { + _outarray[i] = (CCTK_INT1) inarray[i]; + } + } +#endif #ifdef CCTK_INT2 else if (outtype == CCTK_VARIABLE_INT2) { |