diff options
| author | schnetter <schnetter@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2003-10-13 18:07:49 +0000 |
|---|---|---|
| committer | schnetter <schnetter@b589c3ab-70e8-4b4d-a09f-cba2dd200880> | 2003-10-13 18:07:49 +0000 |
| commit | 355ed298bf660be2a165d2c412fb4e48d2a6492a (patch) | |
| tree | 53f1b64c3d1aa74f097d7c45023b89c15a855235 | |
| parent | 5fbb1a2ddf5382f7c8966c84db53678db7448c83 (diff) | |
Introduce the new Cactus variable type CCTK_INT1.
Extend routines to handle the new type.
git-svn-id: http://svn.cactuscode.org/arrangements/CactusBase/IOBasic/trunk@144 b589c3ab-70e8-4b4d-a09f-cba2dd200880
| -rw-r--r-- | src/WriteInfo.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/src/WriteInfo.c b/src/WriteInfo.c index 2355074..b6fb1be 100644 --- a/src/WriteInfo.c +++ b/src/WriteInfo.c @@ -110,6 +110,12 @@ int IOBasic_WriteInfo (const cGH *GH, int vindex) reduction->next->value = (double) ((CCTK_REAL *) ptr)[1]; reduction->next->is_valid = 1; } +#ifdef CCTK_INT1 + else if (vtype == CCTK_VARIABLE_INT1) + { + reduction->value = (double) *(CCTK_INT1 *) ptr; + } +#endif #ifdef CCTK_INT2 else if (vtype == CCTK_VARIABLE_INT2) { |