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.
This commit is contained in:
parent
42e2132c64
commit
868a0084c9
|
@ -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>
|
2009-02-11 Jim Meyering <meyering@redhat.com>
|
||||||
Jan Kratochvil <jan.kratochvil@redhat.com>
|
Jan Kratochvil <jan.kratochvil@redhat.com>
|
||||||
|
|
||||||
|
|
|
@ -5098,11 +5098,13 @@ read_base_type (struct die_info *die, struct dwarf2_cu *cu)
|
||||||
type_flags |= TYPE_FLAG_UNSIGNED;
|
type_flags |= TYPE_FLAG_UNSIGNED;
|
||||||
break;
|
break;
|
||||||
case DW_ATE_signed_char:
|
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;
|
code = TYPE_CODE_CHAR;
|
||||||
break;
|
break;
|
||||||
case DW_ATE_unsigned_char:
|
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;
|
code = TYPE_CODE_CHAR;
|
||||||
type_flags |= TYPE_FLAG_UNSIGNED;
|
type_flags |= TYPE_FLAG_UNSIGNED;
|
||||||
break;
|
break;
|
||||||
|
|
Loading…
Reference in New Issue