This is the mail archive of the
gdb-patches@sourceware.org
mailing list for the GDB project.
TR: [PATCH] fix for PR 2232
- From: "Pierre Muller" <muller at ics dot u-strasbg dot fr>
- To: <gdb-patches at sourceware dot org>
- Cc: "Daniel Jacobowitz" <drow at false dot org>
- Date: Thu, 22 Mar 2007 11:08:27 +0100
- Subject: TR: [PATCH] fix for PR 2232
Sorry, I sent this message to a
non existing mailing list first : gdbpatches@sourceware.org.
The correct email address is gdb-patches@sourceware.org
Pierre Muller
De?: Pierre Muller [mailto:muller@ics.u-strasbg.fr]
Envoyé?: Thursday, March 22, 2007 8:36 AM
À?: 'gdbpatches@sourceware.org'
Objet?: [PATCH] fix for PR 2232
I applied a patch submitted in PR 2232.
ChangeLog entry:
2007-03-21? Pierre Muller? <muller@ics.u-strasbg.fr>
??????? Fix PR pascal/2232.
??????? * p-valprint.c (pascal_object_print_value): Use type_name_no_tag
??????? instead of TYPE_NAME for object base class name.
$ cvs diff -D "1 hour ago" -p p-valprint.c
Index: p-valprint.c
===================================================================
RCS file: /cvs/src/src/gdb/p-valprint.c,v
retrieving revision 1.47
retrieving revision 1.48
diff -p -r1.47 -r1.48
*** p-valprint.c??????? 8 Feb 2007 14:20:56 -0000?????? 1.47
--- p-valprint.c??????? 21 Mar 2007 23:57:14 -0000????? 1.48
*************** pascal_object_print_value (struct type *
*** 827,833 ****
????? {
??????? int boffset;
??????? struct type *baseclass = check_typedef (TYPE_BASECLASS (type, i));
!?????? char *basename = TYPE_NAME (baseclass);
??????? const gdb_byte *base_valaddr;
??????? if (BASETYPE_VIA_VIRTUAL (type, i))
--- 827,833 ----
????? {
??????? int boffset;
??????? struct type *baseclass = check_typedef (TYPE_BASECLASS (type, i));
!?????? char *basename = type_name_no_tag (baseclass);
??????? const gdb_byte *base_valaddr;
??????? if (BASETYPE_VIA_VIRTUAL (type, i))
Pierre Muller
Chargé de recherches
Institut Charles Sadron
6, rue Boussingault
F 67083 Strasbourg Cedex
Tél.?: +(33)3-88-41-40-07
Email?: pierre.muller@ics.u-strasbg.fr