diff options
Diffstat (limited to 'gcc/ada/exp_ch9.adb')
| -rw-r--r-- | gcc/ada/exp_ch9.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/exp_ch9.adb b/gcc/ada/exp_ch9.adb index a6c1940a8cc..248984d89a9 100644 --- a/gcc/ada/exp_ch9.adb +++ b/gcc/ada/exp_ch9.adb @@ -3260,14 +3260,14 @@ package body Exp_Ch9 is begin -- Get the type size - if Known_Esize (Comp_Type) then + if Known_Static_Esize (Comp_Type) then Typ_Size := UI_To_Int (Esize (Comp_Type)); -- If the Esize (Object_Size) is unknown at compile-time, look at -- the RM_Size (Value_Size) since it may have been set by an -- explicit representation clause. - elsif Known_RM_Size (Comp_Type) then + elsif Known_Static_RM_Size (Comp_Type) then Typ_Size := UI_To_Int (RM_Size (Comp_Type)); -- Should not happen since this has already been checked in |