diff options
Diffstat (limited to 'gcc/ada/exp_ch6.adb')
| -rw-r--r-- | gcc/ada/exp_ch6.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch6.adb b/gcc/ada/exp_ch6.adb index 6f3e666776b..cad54ac7ba8 100644 --- a/gcc/ada/exp_ch6.adb +++ b/gcc/ada/exp_ch6.adb @@ -2992,7 +2992,7 @@ package body Exp_Ch6 is Make_Integer_Literal (Loc, Intval => Expr_Value - (Expression (RTE (RE_Default_Secondary_Stack_Size)))); + (Constant_Value (RTE (RE_Default_Secondary_Stack_Size)))); end if; Sec_Stack_Len := Convert_To (RTE (RE_Storage_Offset), Sec_Stack_Len); |