* gdbtk-cmds.c (gdb_search): Don't mention C++ RTTI and
global constructor/destructor symbols.
This commit is contained in:
parent
d744bbbbb8
commit
c888792a27
|
@ -1,3 +1,8 @@
|
|||
Thu Dec 17 09:00:56 1998 Keith Seitz <keiths@cygnus.com>
|
||||
|
||||
* gdbtk-cmds.c (gdb_search): Don't mention C++ RTTI and
|
||||
global constructor/destructor symbols.
|
||||
|
||||
Tue Dec 15 10:09:31 1998 Andrew Cagney <cagney@b1.cygnus.com>
|
||||
|
||||
* gdbtk-cmds.c (gdb_disassemble): Fix typo.
|
||||
|
|
|
@ -1357,6 +1357,7 @@ gdb_search (clientData, interp, objc, objv)
|
|||
result_ptr->flags |= GDBTK_IN_TCL_RESULT;
|
||||
return TCL_ERROR;
|
||||
}
|
||||
}
|
||||
|
||||
switch ((enum switches_opts) index)
|
||||
{
|
||||
|
@ -1412,6 +1413,12 @@ gdb_search (clientData, interp, objc, objv)
|
|||
if (static_only && p->block != STATIC_BLOCK)
|
||||
continue;
|
||||
|
||||
/* Strip off some C++ special symbols, like RTTI and global
|
||||
constructors/destructors. */
|
||||
if ((p->symbol != NULL && !STREQN (SYMBOL_NAME (p->symbol), "__tf", 4)
|
||||
&& !STREQN (SYMBOL_NAME (p->symbol), "_GLOBAL_", 8))
|
||||
|| p->msymbol != NULL)
|
||||
{
|
||||
elem = Tcl_NewListObj (0, NULL);
|
||||
|
||||
if (p->msymbol == NULL)
|
||||
|
@ -1423,6 +1430,7 @@ gdb_search (clientData, interp, objc, objv)
|
|||
|
||||
Tcl_ListObjAppendElement (interp, result_ptr->obj_ptr, elem);
|
||||
}
|
||||
}
|
||||
|
||||
if (ss != NULL)
|
||||
do_cleanups (old_chain);
|
||||
|
|
Loading…
Reference in New Issue