| Index: gdb/opencl-lang.c
|
| diff --git a/gdb/opencl-lang.c b/gdb/opencl-lang.c
|
| index 6557a08f20836fcec54e0da0be5472c07e351770..54075a4194757fa36a222fdafd9c52050a9198a5 100644
|
| --- a/gdb/opencl-lang.c
|
| +++ b/gdb/opencl-lang.c
|
| @@ -68,7 +68,7 @@ enum opencl_primitive_types {
|
|
|
| static struct gdbarch_data *opencl_type_data;
|
|
|
| -struct type **
|
| +static struct type **
|
| builtin_opencl_type (struct gdbarch *gdbarch)
|
| {
|
| return gdbarch_data (gdbarch, opencl_type_data);
|
| @@ -961,7 +961,7 @@ Cannot perform conditional operation on vectors with different sizes"));
|
| return evaluate_subexp_c (expect_type, exp, pos, noside);
|
| }
|
|
|
| -void
|
| +static void
|
| opencl_language_arch_info (struct gdbarch *gdbarch,
|
| struct language_arch_info *lai)
|
| {
|
| @@ -1008,6 +1008,7 @@ const struct language_defn opencl_language_defn =
|
| c_print_typedef, /* Print a typedef using appropriate syntax */
|
| c_val_print, /* Print a value using appropriate syntax */
|
| c_value_print, /* Print a top-level value */
|
| + default_read_var_value, /* la_read_var_value */
|
| NULL, /* Language specific skip_trampoline */
|
| NULL, /* name_of_this */
|
| basic_lookup_symbol_nonlocal, /* lookup_symbol_nonlocal */
|
| @@ -1024,7 +1025,7 @@ const struct language_defn opencl_language_defn =
|
| default_print_array_index,
|
| default_pass_by_reference,
|
| c_get_string,
|
| - strcmp_iw_ordered,
|
| + NULL, /* la_get_symbol_name_cmp */
|
| iterate_over_symbols,
|
| LANG_MAGIC
|
| };
|
| @@ -1116,6 +1117,9 @@ build_opencl_types (struct gdbarch *gdbarch)
|
| return types;
|
| }
|
|
|
| +/* Provide a prototype to silence -Wmissing-prototypes. */
|
| +extern initialize_file_ftype _initialize_opencl_language;
|
| +
|
| void
|
| _initialize_opencl_language (void)
|
| {
|
|
|