diff options
| author | Pierre Muller <muller@sourceware.org> | 2009-02-11 22:30:04 +0000 |
|---|---|---|
| committer | Pierre Muller <muller@sourceware.org> | 2009-02-11 22:30:04 +0000 |
| commit | 868a0084c9d3a15565869fa378d42e02319a478b (patch) | |
| tree | 69475b59fbcc500bcc60ebcb765366f394cb52a2 | |
| parent | 42e2132c64c9935a31073fb5460ac5b14430b69b (diff) | |
| download | gdb-868a0084c9d3a15565869fa378d42e02319a478b.zip gdb-868a0084c9d3a15565869fa378d42e02319a478b.tar.gz gdb-868a0084c9d3a15565869fa378d42e02319a478b.tar.bz2 | |
2009-02-11 Pierre Muller <muller@ics.u-strasbg.fr>
* dwarf2read.c (read_base_type): Set code to TYPE_CODE_CHAR
for DW_ATE_signed_char and DW_ATE_unisgned_char
for pascal language.
| -rw-r--r-- | gdb/ChangeLog | 6 | ||||
| -rw-r--r-- | gdb/dwarf2read.c | 6 |
2 files changed, 10 insertions, 2 deletions
diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 107c3e1..00eee92 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,3 +1,9 @@ +2009-02-11 Pierre Muller <muller@ics.u-strasbg.fr> + + * dwarf2read.c (read_base_type): Set code to TYPE_CODE_CHAR + for DW_ATE_signed_char and DW_ATE_unisgned_char + for pascal language. + 2009-02-11 Jim Meyering <meyering@redhat.com> Jan Kratochvil <jan.kratochvil@redhat.com> diff --git a/gdb/dwarf2read.c b/gdb/dwarf2read.c index 925cfd0..988c4e5 100644 --- a/gdb/dwarf2read.c +++ b/gdb/dwarf2read.c @@ -5098,11 +5098,13 @@ read_base_type (struct die_info *die, struct dwarf2_cu *cu) type_flags |= TYPE_FLAG_UNSIGNED; break; case DW_ATE_signed_char: - if (cu->language == language_ada || cu->language == language_m2) + if (cu->language == language_ada || cu->language == language_m2 + || cu->language == language_pascal) code = TYPE_CODE_CHAR; break; case DW_ATE_unsigned_char: - if (cu->language == language_ada || cu->language == language_m2) + if (cu->language == language_ada || cu->language == language_m2 + || cu->language == language_pascal) code = TYPE_CODE_CHAR; type_flags |= TYPE_FLAG_UNSIGNED; break; |