From d47a7f52cffd062492c0e84af9a7736a2454f760 Mon Sep 17 00:00:00 2001 From: Jim Kingdon Date: Wed, 17 Nov 1993 04:24:34 +0000 Subject: [PATCH] * symtab.c (gdb_mangle_name): Only assume that the physname is the entire mangled name if it looks like the mangled name of a constructor. Needed for testsuite to work with GCC 2.4.5. --- gdb/ChangeLog | 7 +++---- gdb/symtab.c | 21 ++++++++++++++------- 2 files changed, 17 insertions(+), 11 deletions(-) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index cb88933eef3..96c9179ca35 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -15,10 +15,9 @@ Tue Nov 16 17:15:03 1993 Stu Grossman (grossman at cygnus.com) Tue Nov 16 13:33:47 1993 Jim Kingdon (kingdon@lioth.cygnus.com) - * symtab.c (gdb_mangle_name): If we detect something as a - constructor because the field name equals the class name, the - physname is just the args, not the whole mangled name. Needed for - testsuite to work with GCC 2.4.5. + * symtab.c (gdb_mangle_name): Only assume that the physname is + the entire mangled name if it looks like the mangled name of a + constructor. Needed for testsuite to work with GCC 2.4.5. * a68v-nat.c: Replace with new version from Troy Rollo. The version I am replacing appears to be an old copy of sun3-nat.c. diff --git a/gdb/symtab.c b/gdb/symtab.c index 157d2dab62c..2d74466b340 100644 --- a/gdb/symtab.c +++ b/gdb/symtab.c @@ -260,6 +260,11 @@ gdb_mangle_name (type, i, j) char *field_name = TYPE_FN_FIELDLIST_NAME (type, i); char *physname = TYPE_FN_FIELD_PHYSNAME (f, j); char *newname = type_name_no_tag (type); + + /* Does the form of physname indicate that it is the full mangled name + of a constructor (not just the args)? */ + int is_full_physname_constructor; + int is_constructor; int is_destructor = DESTRUCTOR_PREFIX_P (physname); /* Need a new type prefix. */ @@ -268,17 +273,19 @@ gdb_mangle_name (type, i, j) char buf[20]; int len = (newname == NULL ? 0 : strlen (newname)); - is_constructor = newname && STREQ(field_name, newname); - if (!is_constructor) - is_constructor = (physname[0]=='_' && physname[1]=='_' && - (isdigit(physname[2]) || physname[2]=='Q' || physname[2]=='t')); - if (!is_constructor) - is_constructor = (strncmp(physname, "__ct", 4) == 0); + is_full_physname_constructor = + ((physname[0]=='_' && physname[1]=='_' && + (isdigit(physname[2]) || physname[2]=='Q' || physname[2]=='t')) + || (strncmp(physname, "__ct", 4) == 0)); + + is_constructor = + is_full_physname_constructor || (newname && STREQ(field_name, newname)); + if (!is_destructor) is_destructor = (strncmp(physname, "__dt", 4) == 0); #ifndef GCC_MANGLE_BUG - if (is_destructor || is_constructor) + if (is_destructor || is_full_physname_constructor) { mangled_name = (char*) xmalloc(strlen(physname)+1); strcpy(mangled_name, physname); -- 2.30.2