diff options
| author | tradke <tradke@b32723a9-ab3a-4a60-88e2-2e5d99d7c17a> | 2002-04-30 14:12:40 +0000 |
|---|---|---|
| committer | tradke <tradke@b32723a9-ab3a-4a60-88e2-2e5d99d7c17a> | 2002-04-30 14:12:40 +0000 |
| commit | 78603eb5beb1a94639853022da48a6c497227ef5 (patch) | |
| tree | bfac5ecca8df33c6ca832b02a73bad9479d35cd4 | |
| parent | 6b661bbe7e32f6769d1fd24dc30f99e186d70f03 (diff) | |
Cannot downgrade precision for CCTK_SCALAR output.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOUtil/trunk@159 b32723a9-ab3a-4a60-88e2-2e5d99d7c17a
| -rw-r--r-- | src/Utils.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Utils.c b/src/Utils.c index c6a1c98..6c01e76 100644 --- a/src/Utils.c +++ b/src/Utils.c @@ -823,7 +823,7 @@ ioRequest *IOUtil_DefaultIORequest (const cGH *GH, int vindex) /* get the I/O request datatype (will be single-precision if requested) */ request->hdatatype = CCTK_VarTypeI (vindex); - if (myGH->out_single) + if (myGH->out_single && CCTK_GroupTypeFromVarI (vindex) != CCTK_SCALAR) { if (request->hdatatype == CCTK_VARIABLE_REAL) { |