* opencl-lang.c (STRINGIFY): Rename to OCL_STRING.

(BUILD_OCL_VTYPES): Update.
This commit is contained in:
Ulrich Weigand 2011-02-02 13:47:06 +00:00
parent c1039e3cb7
commit 0af3e2db57
2 changed files with 11 additions and 6 deletions

View file

@ -1,3 +1,8 @@
2011-02-02 Ulrich Weigand <uweigand@de.ibm.com>
* opencl-lang.c (STRINGIFY): Rename to OCL_STRING.
(BUILD_OCL_VTYPES): Update.
2011-02-02 Joel Brobecker <brobecker@adacore.com> 2011-02-02 Joel Brobecker <brobecker@adacore.com>
* configure.ac: Work around non-GNU sed limitation when computing * configure.ac: Work around non-GNU sed limitation when computing

View file

@ -1116,27 +1116,27 @@ build_opencl_types (struct gdbarch *gdbarch)
= GDBARCH_OBSTACK_ZALLOC (gdbarch, struct builtin_opencl_type); = GDBARCH_OBSTACK_ZALLOC (gdbarch, struct builtin_opencl_type);
/* Helper macro to create strings. */ /* Helper macro to create strings. */
#define STRINGIFY(S) #S #define OCL_STRING(S) #S
/* This macro allocates and assigns the type struct pointers /* This macro allocates and assigns the type struct pointers
for the vector types. */ for the vector types. */
#define BUILD_OCL_VTYPES(TYPE)\ #define BUILD_OCL_VTYPES(TYPE)\
builtin_opencl_type->builtin_##TYPE##2\ builtin_opencl_type->builtin_##TYPE##2\
= init_vector_type (builtin_opencl_type->builtin_##TYPE, 2);\ = init_vector_type (builtin_opencl_type->builtin_##TYPE, 2);\
TYPE_NAME (builtin_opencl_type->builtin_##TYPE##2) = STRINGIFY(TYPE ## 2);\ TYPE_NAME (builtin_opencl_type->builtin_##TYPE##2) = OCL_STRING(TYPE ## 2);\
builtin_opencl_type->builtin_##TYPE##3\ builtin_opencl_type->builtin_##TYPE##3\
= init_vector_type (builtin_opencl_type->builtin_##TYPE, 3);\ = init_vector_type (builtin_opencl_type->builtin_##TYPE, 3);\
TYPE_NAME (builtin_opencl_type->builtin_##TYPE##3) = STRINGIFY(TYPE ## 3);\ TYPE_NAME (builtin_opencl_type->builtin_##TYPE##3) = OCL_STRING(TYPE ## 3);\
TYPE_LENGTH (builtin_opencl_type->builtin_##TYPE##3)\ TYPE_LENGTH (builtin_opencl_type->builtin_##TYPE##3)\
= 4 * TYPE_LENGTH (builtin_opencl_type->builtin_##TYPE);\ = 4 * TYPE_LENGTH (builtin_opencl_type->builtin_##TYPE);\
builtin_opencl_type->builtin_##TYPE##4\ builtin_opencl_type->builtin_##TYPE##4\
= init_vector_type (builtin_opencl_type->builtin_##TYPE, 4);\ = init_vector_type (builtin_opencl_type->builtin_##TYPE, 4);\
TYPE_NAME (builtin_opencl_type->builtin_##TYPE##4) = STRINGIFY(TYPE ## 4);\ TYPE_NAME (builtin_opencl_type->builtin_##TYPE##4) = OCL_STRING(TYPE ## 4);\
builtin_opencl_type->builtin_##TYPE##8\ builtin_opencl_type->builtin_##TYPE##8\
= init_vector_type (builtin_opencl_type->builtin_##TYPE, 8);\ = init_vector_type (builtin_opencl_type->builtin_##TYPE, 8);\
TYPE_NAME (builtin_opencl_type->builtin_##TYPE##8) = STRINGIFY(TYPE ## 8);\ TYPE_NAME (builtin_opencl_type->builtin_##TYPE##8) = OCL_STRING(TYPE ## 8);\
builtin_opencl_type->builtin_##TYPE##16\ builtin_opencl_type->builtin_##TYPE##16\
= init_vector_type (builtin_opencl_type->builtin_##TYPE, 16);\ = init_vector_type (builtin_opencl_type->builtin_##TYPE, 16);\
TYPE_NAME (builtin_opencl_type->builtin_##TYPE##16) = STRINGIFY(TYPE ## 16) TYPE_NAME (builtin_opencl_type->builtin_##TYPE##16) = OCL_STRING(TYPE ## 16)
builtin_opencl_type->builtin_char builtin_opencl_type->builtin_char
= arch_integer_type (gdbarch, 8, 0, "char"); = arch_integer_type (gdbarch, 8, 0, "char");