mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-04-24 19:21:12 +08:00
Code Issues Packages Projects Releases Wiki Activity

trans.c (Loop_Statement_to_gnu): Revert to using size_type_node instead of sizetype.

Browse Source 
* gcc-interface/trans.c (Loop_Statement_to_gnu): Revert to using
	size_type_node instead of sizetype.

From-SVN: r191069
This commit is contained in:
Eric Botcazou 2012-09-07 11:55:06 +00:00 committed by Eric Botcazou
parent e919e5bffb
commit 48d3d75d39
2 changed files with 9 additions and 3 deletions
gcc/ada
ChangeLog
gcc-interface
trans.c

5
gcc/ada/ChangeLog

@ -1,3 +1,8 @@
2012-09-07 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/trans.c (Loop_Statement_to_gnu): Revert to using
size_type_node instead of sizetype.
2012-08-19 Eric Botcazou <ebotcazou@adacore.com>
* layout.adb (Set_Elem_Alignment): Cap the alignment of access types

7
gcc/ada/gcc-interface/trans.c

@ -2417,14 +2417,15 @@ Loop_Statement_to_gnu (Node_Id gnat_node)
/* Otherwise, use the do-while form with the help of a special
induction variable in the unsigned version of the base type
or the unsigned version of sizetype, whichever is the
or the unsigned version of the size type, whichever is the
largest, in order to have wrap-around arithmetics for it. */
else
{
if (TYPE_PRECISION (gnu_base_type) > TYPE_PRECISION (sizetype))
if (TYPE_PRECISION (gnu_base_type)
> TYPE_PRECISION (size_type_node))
gnu_base_type = gnat_unsigned_type (gnu_base_type);
else
gnu_base_type = sizetype;
gnu_base_type = size_type_node;
gnu_first = convert (gnu_base_type, gnu_first);
gnu_last = convert (gnu_base_type, gnu_last);