+2009-04-07 Eric Botcazou <ebotcazou@adacore.com>
+
+ * gcc-interface/trans.c (Attribute_to_gnu) <Max_Size_In_Storage_Elmts>:
+ Do not convert the result. Remove obsolete comment.
+
2009-04-07 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/trans.c (establish_gnat_vms_condition_handler): Clear
gnu_result_type = get_unpadded_type (Etype (gnat_node));
- /* Always perform division using unsigned arithmetic as the size cannot
- be negative, but may be an overflowed positive value. This provides
- correct results for sizes up to 512 MB.
-
- ??? Size should be calculated in storage elements directly. */
-
if (attribute == Attr_Max_Size_In_Storage_Elements)
- gnu_result = convert (sizetype,
- fold_build2 (CEIL_DIV_EXPR, bitsizetype,
- gnu_result, bitsize_unit_node));
+ gnu_result = fold_build2 (CEIL_DIV_EXPR, bitsizetype,
+ gnu_result, bitsize_unit_node);
break;
case Attr_Alignment: