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) |
{ |