From: Keith Seitz <keiths@cygnus>
Date: Fri, 18 Sep 1998 23:45:45 +0000 (+0000)
Subject:         * gdbtk-cmds.c (get_frame_name): Demangle function names, too.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=864e89fc9d0ed8e5ae9acdd59647c0cbf63089fb;p=binutils-gdb.git

    * gdbtk-cmds.c (get_frame_name): Demangle function names, too.
---

diff --git a/gdb/ChangeLog-gdbtk b/gdb/ChangeLog-gdbtk
index 447c21bdb17..549fd06679e 100644
--- a/gdb/ChangeLog-gdbtk
+++ b/gdb/ChangeLog-gdbtk
@@ -1,3 +1,7 @@
+1998-09-18  Keith Seitz  <keiths@cygnus.com>
+
+        * gdbtk-cmds.c (get_frame_name): Demangle function names, too.
+
 Thu Sep 10 22:10:29  1998 Jim Ingham <jingham@cygnus.com>
 
 	*gdbtk-cmds.c (gdb_disassemble): Make sure the symtab's linetable is not
diff --git a/gdb/gdbtk-cmds.c b/gdb/gdbtk-cmds.c
index c2eabdb7aca..9a22d3e4a12 100644
--- a/gdb/gdbtk-cmds.c
+++ b/gdb/gdbtk-cmds.c
@@ -3118,7 +3118,14 @@ get_frame_name (interp, list, fi)
   
   if (sal.symtab)
     {
-      objv[0] = Tcl_NewStringObj (funname, -1);
+      char *name = NULL;
+
+      if (funlang == language_cplus)
+        name = cplus_demangle (funname, 0);
+      if (name == NULL)
+        name = funname;
+
+      objv[0] = Tcl_NewStringObj (name, -1);
       Tcl_ListObjAppendElement (interp, list, objv[0]);
     }
   else