FreeChainXenon/binutils-gdb
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

* ada-lang.c (ada_modulus): Correct to avoid sign problem with

Browse source 
moduli >= 2**31.
This commit is contained in:
Joel Brobecker 2008-09-30 21:53:32 +00:00
parent b1f33ddde1
commit d37209fddb
2 changed files with 7 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

7
gdb/ChangeLog
View file

@ -1,4 +1,9 @@
2008-09-30 Paul Hilfinger <brobecker@adacore.com>
2008-09-30 Paul Hilfinger <hilfinger@adacore.com>
* ada-lang.c (ada_modulus): Correct to avoid sign problem with
moduli >= 2**31.
2008-09-30 Paul Hilfinger <hilfinger@adacore.com>
* ada-lang.c (ada_lookup_struct_elt_type): Handle case of a "naked"
variant branch.

2
gdb/ada-lang.c
View file

@ -9626,7 +9626,7 @@ ada_is_modular_type (struct type *type)
ULONGEST
ada_modulus (struct type * type)
{
return (ULONGEST) TYPE_HIGH_BOUND (type) + 1;
return (ULONGEST) (unsigned int) TYPE_HIGH_BOUND (type) + 1;
}