diff options
Diffstat (limited to 'gcc/ada/trans.c')
| -rw-r--r-- | gcc/ada/trans.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/gcc/ada/trans.c b/gcc/ada/trans.c index dc34b72..efa99fe 100644 --- a/gcc/ada/trans.c +++ b/gcc/ada/trans.c @@ -1886,10 +1886,10 @@ tree_transform (Node_Id gnat_node) /* For right shifts, the type says what kind of shift to do, so we may need to choose a different type. */ if (Nkind (gnat_node) == N_Op_Shift_Right - && ! TREE_UNSIGNED (gnu_type)) + && ! TYPE_UNSIGNED (gnu_type)) gnu_type = gnat_unsigned_type (gnu_type); else if (Nkind (gnat_node) == N_Op_Shift_Right_Arithmetic - && TREE_UNSIGNED (gnu_type)) + && TYPE_UNSIGNED (gnu_type)) gnu_type = gnat_signed_type (gnu_type); if (gnu_type != gnu_result_type) @@ -4729,17 +4729,17 @@ convert_with_check (Entity_Id gnat_type, /* Convert the lower bounds to signed types, so we're sure we're comparing them properly. Likewise, convert the upper bounds to unsigned types. */ - if (INTEGRAL_TYPE_P (gnu_in_basetype) && TREE_UNSIGNED (gnu_in_basetype)) + if (INTEGRAL_TYPE_P (gnu_in_basetype) && TYPE_UNSIGNED (gnu_in_basetype)) gnu_in_lb = convert (gnat_signed_type (gnu_in_basetype), gnu_in_lb); if (INTEGRAL_TYPE_P (gnu_in_basetype) - && ! TREE_UNSIGNED (gnu_in_basetype)) + && !TYPE_UNSIGNED (gnu_in_basetype)) gnu_in_ub = convert (gnat_unsigned_type (gnu_in_basetype), gnu_in_ub); - if (INTEGRAL_TYPE_P (gnu_base_type) && TREE_UNSIGNED (gnu_base_type)) + if (INTEGRAL_TYPE_P (gnu_base_type) && TYPE_UNSIGNED (gnu_base_type)) gnu_out_lb = convert (gnat_signed_type (gnu_base_type), gnu_out_lb); - if (INTEGRAL_TYPE_P (gnu_base_type) && ! TREE_UNSIGNED (gnu_base_type)) + if (INTEGRAL_TYPE_P (gnu_base_type) && !TYPE_UNSIGNED (gnu_base_type)) gnu_out_ub = convert (gnat_unsigned_type (gnu_base_type), gnu_out_ub); /* Check each bound separately and only if the result bound |