diff options
Diffstat (limited to 'gcc/ada/freeze.adb')
| -rw-r--r-- | gcc/ada/freeze.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb index 4394625..fc39cc7 100644 --- a/gcc/ada/freeze.adb +++ b/gcc/ada/freeze.adb @@ -7713,7 +7713,7 @@ package body Freeze is elsif Is_Integer_Type (E) then Adjust_Esize_For_Alignment (E); - if Is_Modular_Integer_Type (E) then + if Has_Modular_Operations (E) then -- Standard_Address has been built with the assumption that its -- modulus was System_Address_Size, but this is not a universal -- property and may need to be corrected. |