[PATCH] Fix build for recent symbol searching updates in gdb

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

[PATCH] Fix build for recent symbol searching updates in gdb

Keith Seitz
Hi,

I've committed the attached patch to do $SUBJECT. This should get the
build working again.

Keith

2013-08-15  Keith Seitz  <[hidden email]>

        * generic/gdbtk-cmds.c (gdb_search): Update for symbol
        searching API update in gdb.

Index: generic/gdbtk-cmds.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-cmds.c,v
retrieving revision 1.135
diff -u -p -r1.135 gdbtk-cmds.c
--- generic/gdbtk-cmds.c 30 Jul 2013 23:16:43 -0000 1.135
+++ generic/gdbtk-cmds.c 15 Aug 2013 14:19:47 -0000
@@ -1461,7 +1461,7 @@ gdb_search (ClientData clientData, Tcl_I
 
   search_symbols (regexp, space, nfiles, files, &ss);
   if (ss != NULL)
-    old_chain = make_cleanup_free_search_symbols (ss);
+    old_chain = make_cleanup_free_search_symbols (&ss);
 
   Tcl_SetListObj (result_ptr->obj_ptr, 0, NULL);
 
@@ -1477,16 +1477,16 @@ gdb_search (ClientData clientData, Tcl_I
       if ((p->symbol != NULL
    && strncmp (SYMBOL_LINKAGE_NAME (p->symbol), "__tf", 4) != 0
    && strncmp (SYMBOL_LINKAGE_NAME (p->symbol), "_GLOBAL_", 8) != 0)
-  || p->msymbol != NULL)
+  || p->msymbol.minsym != NULL)
  {
   elem = Tcl_NewListObj (0, NULL);
 
-  if (p->msymbol == NULL)
+  if (p->msymbol.minsym == NULL)
     Tcl_ListObjAppendElement (interp, elem,
       Tcl_NewStringObj (SYMBOL_PRINT_NAME (p->symbol), -1));
   else
     Tcl_ListObjAppendElement (interp, elem,
-      Tcl_NewStringObj (SYMBOL_PRINT_NAME (p->msymbol), -1));
+      Tcl_NewStringObj (SYMBOL_PRINT_NAME (p->msymbol.minsym), -1));
 
   if (show_files)
     {