summaryrefslogtreecommitdiff
path: root/src/util/Table.c
diff options
context:
space:
mode:
authorschnetter <schnetter@17b73243-c579-4c4c-a9d2-2d5706c11dac>2004-03-08 10:52:24 +0000
committerschnetter <schnetter@17b73243-c579-4c4c-a9d2-2d5706c11dac>2004-03-08 10:52:24 +0000
commit405dbffa8c59d78bb5c22c37cf1488c89bb0b9b0 (patch)
treedbc3297d18a8360d21489e9cce358fff1f4d6c61 /src/util/Table.c
parentc1a9ebde95b37d77b210e35c97cd930f3c60a4c4 (diff)
Use the correct macros to determine which CCTK_* types are defined.
Fix wrong prototype. git-svn-id: http://svn.cactuscode.org/flesh/trunk@3585 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/util/Table.c')
-rw-r--r--src/util/Table.c136
1 files changed, 68 insertions, 68 deletions
diff --git a/src/util/Table.c b/src/util/Table.c
index 1b9ab309..044598bb 100644
--- a/src/util/Table.c
+++ b/src/util/Table.c
@@ -2142,7 +2142,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_INTEGER_PRECISION_1
+#ifdef CCTK_INT1
int Util_TableSetInt1(int handle, CCTK_INT1 value, const char *key)
{
return Util_TableSetInt1Array(handle, 1, &value, key);
@@ -2161,7 +2161,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt1)
}
#endif
-#ifdef CCTK_INTEGER_PRECISION_2
+#ifdef CCTK_INT2
int Util_TableSetInt2(int handle, CCTK_INT2 value, const char *key)
{
return Util_TableSetInt2Array(handle, 1, &value, key);
@@ -2182,7 +2182,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt2)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_4
+#ifdef CCTK_INT4
int Util_TableSetInt4(int handle, CCTK_INT4 value, const char *key)
{
return Util_TableSetInt4Array(handle, 1, &value, key);
@@ -2203,7 +2203,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt4)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_8
+#ifdef CCTK_INT8
int Util_TableSetInt8(int handle, CCTK_INT8 value, const char *key)
{
return Util_TableSetInt8Array(handle, 1, &value, key);
@@ -2249,7 +2249,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetReal)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_REAL_PRECISION_4
+#ifdef CCTK_REAL4
int Util_TableSetReal4(int handle, CCTK_REAL4 value, const char *key)
{
return Util_TableSetReal4Array(handle, 1, &value, key);
@@ -2270,7 +2270,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetReal4)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_8
+#ifdef CCTK_REAL8
int Util_TableSetReal8(int handle, CCTK_REAL8 value, const char *key)
{
return Util_TableSetReal8Array(handle, 1, &value, key);
@@ -2291,7 +2291,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetReal8)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_16
+#ifdef CCTK_REAL16
int Util_TableSetReal16(int handle, CCTK_REAL16 value, const char *key)
{
return Util_TableSetReal16Array(handle, 1, &value, key);
@@ -2337,7 +2337,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplex)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_COMPLEX_PRECISION_8
+#ifdef CCTK_REAL4
int Util_TableSetComplex8(int handle, CCTK_COMPLEX8 value, const char *key)
{
return Util_TableSetComplex8Array(handle, 1, &value, key);
@@ -2358,7 +2358,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplex8)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_16
+#ifdef CCTK_REAL8
int Util_TableSetComplex16(int handle, CCTK_COMPLEX16 value, const char *key)
{
return Util_TableSetComplex16Array(handle, 1, &value, key);
@@ -2379,7 +2379,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplex16)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_32
+#ifdef CCTK_REAL16
int Util_TableSetComplex32(int handle, CCTK_COMPLEX32 value, const char *key)
{
return Util_TableSetComplex32Array(handle, 1, &value, key);
@@ -2608,7 +2608,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetIntArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_INTEGER_PRECISION_1
+#ifdef CCTK_INT1
int Util_TableSetInt1Array(int handle,
int N_elements, const CCTK_INT1 array[],
const char *key)
@@ -2633,7 +2633,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt1Array)
}
#endif
-#ifdef CCTK_INTEGER_PRECISION_2
+#ifdef CCTK_INT2
int Util_TableSetInt2Array(int handle,
int N_elements, const CCTK_INT2 array[],
const char *key)
@@ -2660,7 +2660,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt2Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_4
+#ifdef CCTK_INT4
int Util_TableSetInt4Array(int handle,
int N_elements, const CCTK_INT4 array[],
const char *key)
@@ -2687,7 +2687,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetInt4Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_8
+#ifdef CCTK_INT8
int Util_TableSetInt8Array(int handle,
int N_elements, const CCTK_INT8 array[],
const char *key)
@@ -2746,7 +2746,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetRealArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_REAL_PRECISION_4
+#ifdef CCTK_REAL4
int Util_TableSetReal4Array(int handle,
int N_elements, const CCTK_REAL4 array[],
const char *key)
@@ -2773,7 +2773,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetReal4Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_8
+#ifdef CCTK_REAL8
int Util_TableSetReal8Array(int handle,
int N_elements, const CCTK_REAL8 array[],
const char *key)
@@ -2800,7 +2800,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetReal8Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_16
+#ifdef CCTK_REAL16
int Util_TableSetReal16Array(int handle,
int N_elements, const CCTK_REAL16 array[],
const char *key)
@@ -2858,7 +2858,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplexArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_COMPLEX_PRECISION_8
+#ifdef CCTK_REAL4
int Util_TableSetComplex8Array(int handle,
int N_elements, const CCTK_COMPLEX8 array[],
const char *key)
@@ -2885,7 +2885,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplex8Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_16
+#ifdef CCTK_REAL8
int Util_TableSetComplex16Array(int handle,
int N_elements, const CCTK_COMPLEX16 array[],
const char *key)
@@ -2912,7 +2912,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableSetComplex16Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_32
+#ifdef CCTK_REAL16
int Util_TableSetComplex32Array(int handle,
int N_elements, const CCTK_COMPLEX32 array[],
const char *key)
@@ -3129,7 +3129,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_INTEGER_PRECISION_1
+#ifdef CCTK_INT1
int Util_TableGetInt1(int handle, CCTK_INT1 *value, const char *key)
{
const int status = Util_TableGetInt1Array(handle, 1, value, key);
@@ -3151,7 +3151,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt1)
}
#endif
-#ifdef CCTK_INTEGER_PRECISION_2
+#ifdef CCTK_INT2
int Util_TableGetInt2(int handle, CCTK_INT2 *value, const char *key)
{
const int status = Util_TableGetInt2Array(handle, 1, value, key);
@@ -3175,7 +3175,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt2)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_4
+#ifdef CCTK_INT4
int Util_TableGetInt4(int handle, CCTK_INT4 *value, const char *key)
{
const int status = Util_TableGetInt4Array(handle, 1, value, key);
@@ -3199,7 +3199,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt4)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_8
+#ifdef CCTK_INT8
int Util_TableGetInt8(int handle, CCTK_INT8 *value, const char *key)
{
const int status = Util_TableGetInt8Array(handle, 1, value, key);
@@ -3248,7 +3248,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetReal)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_REAL_PRECISION_4
+#ifdef CCTK_REAL4
int Util_TableGetReal4(int handle, CCTK_REAL4 *value, const char *key)
{
const int status = Util_TableGetReal4Array(handle, 1, value, key);
@@ -3272,7 +3272,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetReal4)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_8
+#ifdef CCTK_REAL8
int Util_TableGetReal8(int handle, CCTK_REAL8 *value, const char *key)
{
const int status = Util_TableGetReal8Array(handle, 1, value, key);
@@ -3296,7 +3296,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetReal8)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_16
+#ifdef CCTK_REAL16
int Util_TableGetReal16(int handle, CCTK_REAL16 *value, const char *key)
{
const int status = Util_TableGetReal16Array(handle, 1, value, key);
@@ -3308,7 +3308,7 @@ int Util_TableGetReal16(int handle, CCTK_REAL16 *value, const char *key)
#ifndef UTIL_TABLE_TEST
void CCTK_FCALL CCTK_FNAME (Util_TableGetReal16)
(int *retval, const int *handle,
- CCTK_REAL4 *value, ONE_FORTSTRING_ARG);
+ CCTK_REAL16 *value, ONE_FORTSTRING_ARG);
void CCTK_FCALL CCTK_FNAME (Util_TableGetReal16)
(int *retval, const int *handle,
CCTK_REAL16 *value, ONE_FORTSTRING_ARG)
@@ -3345,7 +3345,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplex)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_COMPLEX_PRECISION_8
+#ifdef CCTK_REAL4
int Util_TableGetComplex8(int handle, CCTK_COMPLEX8 *value, const char *key)
{
const int status = Util_TableGetComplex8Array(handle, 1, value, key);
@@ -3369,7 +3369,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplex8)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_16
+#ifdef CCTK_REAL8
int Util_TableGetComplex16(int handle, CCTK_COMPLEX16 *value, const char *key)
{
const int status = Util_TableGetComplex16Array(handle, 1, value, key);
@@ -3393,7 +3393,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplex16)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_32
+#ifdef CCTK_REAL16
int Util_TableGetComplex32(int handle, CCTK_COMPLEX32 *value, const char *key)
{
const int status = Util_TableGetComplex32Array(handle, 1, value, key);
@@ -3632,7 +3632,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetIntArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_INTEGER_PRECISION_1
+#ifdef CCTK_INT1
int Util_TableGetInt1Array(int handle,
int N_elements, CCTK_INT1 array[],
const char *key)
@@ -3657,7 +3657,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt1Array)
}
#endif
-#ifdef CCTK_INTEGER_PRECISION_2
+#ifdef CCTK_INT2
int Util_TableGetInt2Array(int handle,
int N_elements, CCTK_INT2 array[],
const char *key)
@@ -3684,7 +3684,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt2Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_4
+#ifdef CCTK_INT4
int Util_TableGetInt4Array(int handle,
int N_elements, CCTK_INT4 array[],
const char *key)
@@ -3711,7 +3711,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetInt4Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_INTEGER_PRECISION_8
+#ifdef CCTK_INT8
int Util_TableGetInt8Array(int handle,
int N_elements, CCTK_INT8 array[],
const char *key)
@@ -3766,7 +3766,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetRealArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_REAL_PRECISION_4
+#ifdef CCTK_REAL4
int Util_TableGetReal4Array(int handle,
int N_elements, CCTK_REAL4 array[],
const char *key)
@@ -3793,7 +3793,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetReal4Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_8
+#ifdef CCTK_REAL8
int Util_TableGetReal8Array(int handle,
int N_elements, CCTK_REAL8 array[],
const char *key)
@@ -3820,7 +3820,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetReal8Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_REAL_PRECISION_16
+#ifdef CCTK_REAL16
int Util_TableGetReal16Array(int handle,
int N_elements, CCTK_REAL16 array[],
const char *key)
@@ -3875,7 +3875,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplexArray)
}
#endif /* !UTIL_TABLE_TEST */
-#ifdef CCTK_COMPLEX_PRECISION_8
+#ifdef CCTK_REAL4
int Util_TableGetComplex8Array(int handle,
int N_elements, CCTK_COMPLEX8 array[],
const char *key)
@@ -3902,7 +3902,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplex8Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_16
+#ifdef CCTK_REAL8
int Util_TableGetComplex16Array(int handle,
int N_elements, CCTK_COMPLEX16 array[],
const char *key)
@@ -3929,7 +3929,7 @@ void CCTK_FCALL CCTK_FNAME (Util_TableGetComplex16Array)
#endif /* !UTIL_TABLE_TEST */
#endif
-#ifdef CCTK_COMPLEX_PRECISION_32
+#ifdef CCTK_REAL16
int Util_TableGetComplex32Array(int handle,
int N_elements, CCTK_COMPLEX32 array[],
const char *key)
@@ -5698,19 +5698,19 @@ static
/* integers */
CHECK_SET_GET_INT(handle, CCTK_INT, 0, case_insensitive,
Util_TableSetInt, Util_TableGetInt);
- #ifdef CCTK_INTEGER_PRECISION_1
+ #ifdef CCTK_INT1
CHECK_SET_GET_INT(handle, CCTK_INT1, 1, case_insensitive,
Util_TableSetInt1, Util_TableGetInt1);
#endif
- #ifdef CCTK_INTEGER_PRECISION_2
+ #ifdef CCTK_INT2
CHECK_SET_GET_INT(handle, CCTK_INT2, 1, case_insensitive,
Util_TableSetInt2, Util_TableGetInt2);
#endif
- #ifdef CCTK_INTEGER_PRECISION_4
+ #ifdef CCTK_INT4
CHECK_SET_GET_INT(handle, CCTK_INT4, 1, case_insensitive,
Util_TableSetInt4, Util_TableGetInt4);
#endif
- #ifdef CCTK_INTEGER_PRECISION_8
+ #ifdef CCTK_INT8
CHECK_SET_GET_INT(handle, CCTK_INT8, 1, case_insensitive,
Util_TableSetInt8, Util_TableGetInt8);
#endif
@@ -5722,19 +5722,19 @@ static
/* generic scalars which are actually integers */
CHECK_SET_GET_GENERIC_INT(handle, CCTK_VARIABLE_INT, CCTK_INT,
0, case_insensitive);
- #ifdef CCTK_INTEGER_PRECISION_1
+ #ifdef CCTK_INT1
CHECK_SET_GET_GENERIC_INT(handle, CCTK_VARIABLE_INT1, CCTK_INT1,
1, case_insensitive);
#endif
- #ifdef CCTK_INTEGER_PRECISION_2
+ #ifdef CCTK_INT2
CHECK_SET_GET_GENERIC_INT(handle, CCTK_VARIABLE_INT2, CCTK_INT2,
1, case_insensitive);
#endif
- #ifdef CCTK_INTEGER_PRECISION_4
+ #ifdef CCTK_INT4
CHECK_SET_GET_GENERIC_INT(handle, CCTK_VARIABLE_INT4, CCTK_INT4,
1, case_insensitive);
#endif
- #ifdef CCTK_INTEGER_PRECISION_8
+ #ifdef CCTK_INT8
CHECK_SET_GET_GENERIC_INT(handle, CCTK_VARIABLE_INT8, CCTK_INT8,
1, case_insensitive);
#endif
@@ -5748,15 +5748,15 @@ static
/* complex numbers */
CHECK_SET_GET_COMPLEX(handle, CCTK_COMPLEX, 0, case_insensitive,
Util_TableSetComplex, Util_TableGetComplex);
- #ifdef CCTK_COMPLEX_PRECISION_8
+ #ifdef CCTK_REAL4
CHECK_SET_GET_COMPLEX(handle, CCTK_COMPLEX8, 1, case_insensitive,
Util_TableSetComplex8, Util_TableGetComplex8);
#endif
- #ifdef CCTK_COMPLEX_PRECISION_16
+ #ifdef CCTK_REAL8
CHECK_SET_GET_COMPLEX(handle, CCTK_COMPLEX16, 1, case_insensitive,
Util_TableSetComplex16, Util_TableGetComplex16);
#endif
- #ifdef CCTK_COMPLEX_PRECISION_32
+ #ifdef CCTK_REAL16
CHECK_SET_GET_COMPLEX(handle, CCTK_COMPLEX32, 1, case_insensitive,
Util_TableSetComplex32, Util_TableGetComplex32);
#endif
@@ -5768,15 +5768,15 @@ static
/* reals */
CHECK_SET_GET_REAL(handle, CCTK_REAL, 0, case_insensitive,
Util_TableSetReal, Util_TableGetReal);
- #ifdef CCTK_REAL_PRECISION_4
+ #ifdef CCTK_REAL4
CHECK_SET_GET_REAL(handle, CCTK_REAL4, 1, case_insensitive,
Util_TableSetReal4, Util_TableGetReal4);
#endif
- #ifdef CCTK_REAL_PRECISION_8
+ #ifdef CCTK_REAL8
CHECK_SET_GET_REAL(handle, CCTK_REAL8, 1, case_insensitive,
Util_TableSetReal8, Util_TableGetReal8);
#endif
- #ifdef CCTK_REAL_PRECISION_16
+ #ifdef CCTK_REAL16
CHECK_SET_GET_REAL(handle, CCTK_REAL16, 1, case_insensitive,
Util_TableSetReal16, Util_TableGetReal16);
#endif
@@ -5825,19 +5825,19 @@ static
Util_TableSetCharArray, Util_TableGetCharArray);
CHECK_SET_GET_INT_ARRAY(handle, CCTK_INT, 1,
Util_TableSetIntArray, Util_TableGetIntArray);
- #ifdef CCTK_INTEGER_PRECISION_1
+ #ifdef CCTK_INT1
CHECK_SET_GET_INT_ARRAY(handle, CCTK_INT1, 1,
Util_TableSetInt1Array, Util_TableGetInt1Array);
#endif
- #ifdef CCTK_INTEGER_PRECISION_2
+ #ifdef CCTK_INT2
CHECK_SET_GET_INT_ARRAY(handle, CCTK_INT2, 1,
Util_TableSetInt2Array, Util_TableGetInt2Array);
#endif
- #ifdef CCTK_INTEGER_PRECISION_4
+ #ifdef CCTK_INT4
CHECK_SET_GET_INT_ARRAY(handle, CCTK_INT4, 1,
Util_TableSetInt4Array, Util_TableGetInt4Array);
#endif
- #ifdef CCTK_INTEGER_PRECISION_8
+ #ifdef CCTK_INT8
CHECK_SET_GET_INT_ARRAY(handle, CCTK_INT8, 1,
Util_TableSetInt8Array, Util_TableGetInt8Array);
#endif
@@ -5847,15 +5847,15 @@ static
/* reals */
CHECK_SET_GET_REAL_ARRAY(handle, CCTK_REAL, 0,
Util_TableSetRealArray, Util_TableGetRealArray);
- #ifdef CCTK_REAL_PRECISION_4
+ #ifdef CCTK_REAL4
CHECK_SET_GET_REAL_ARRAY(handle, CCTK_REAL4, 1,
Util_TableSetReal4Array, Util_TableGetReal4Array);
#endif
- #ifdef CCTK_REAL_PRECISION_8
+ #ifdef CCTK_REAL8
CHECK_SET_GET_REAL_ARRAY(handle, CCTK_REAL8, 1,
Util_TableSetReal8Array, Util_TableGetReal8Array);
#endif
- #ifdef CCTK_REAL_PRECISION_16
+ #ifdef CCTK_REAL16
CHECK_SET_GET_REAL_ARRAY(handle, CCTK_REAL16, 1,
Util_TableSetReal16Array, Util_TableGetReal16Array);
#endif
@@ -5864,13 +5864,13 @@ static
/* generic arrays which are actually reals */
CHECK_SET_GET_GENERIC_REAL_ARRAY(handle, CCTK_VARIABLE_REAL, CCTK_REAL, 0);
- #ifdef CCTK_REAL_PRECISION_4
+ #ifdef CCTK_REAL4
CHECK_SET_GET_GENERIC_REAL_ARRAY(handle, CCTK_VARIABLE_REAL4, CCTK_REAL4, 1);
#endif
- #ifdef CCTK_REAL_PRECISION_8
+ #ifdef CCTK_REAL8
CHECK_SET_GET_GENERIC_REAL_ARRAY(handle, CCTK_VARIABLE_REAL8, CCTK_REAL8, 1);
#endif
- #ifdef CCTK_REAL_PRECISION_16
+ #ifdef CCTK_REAL16
CHECK_SET_GET_GENERIC_REAL_ARRAY(handle,
CCTK_VARIABLE_REAL16, CCTK_REAL16, 1);
#endif
@@ -5880,17 +5880,17 @@ static
CHECK_SET_GET_COMPLEX_ARRAY(handle, CCTK_COMPLEX, 0,
Util_TableSetComplexArray,
Util_TableGetComplexArray);
- #ifdef CCTK_COMPLEX_PRECISION_8
+ #ifdef CCTK_REAL4
CHECK_SET_GET_COMPLEX_ARRAY(handle, CCTK_COMPLEX8, 1,
Util_TableSetComplex8Array,
Util_TableGetComplex8Array);
#endif
- #ifdef CCTK_COMPLEX_PRECISION_16
+ #ifdef CCTK_REAL8
CHECK_SET_GET_COMPLEX_ARRAY(handle, CCTK_COMPLEX16, 1,
Util_TableSetComplex16Array,
Util_TableGetComplex16Array);
#endif
- #ifdef CCTK_COMPLEX_PRECISION_32
+ #ifdef CCTK_REAL16
CHECK_SET_GET_COMPLEX_ARRAY(handle, CCTK_COMPLEX32, 1,
Util_TableSetComplex32Array,
Util_TableGetComplex32Array);