diff options
author | Marc Poulhiès <poulhies@adacore.com> | 2022-08-22 10:25:09 +0200 |
---|---|---|
committer | Marc Poulhiès <poulhies@adacore.com> | 2022-09-06 09:14:23 +0200 |
commit | e60709b78248768fb6a36a2cabf713ece3887f86 (patch) | |
tree | 33db19c72128bf8d1a48ecea58162e5a4ee3ed9d | |
parent | 8a99a8e6bcfd8c2ce739baaaca0e34d46c3343f2 (diff) | |
download | gcc-e60709b78248768fb6a36a2cabf713ece3887f86.zip gcc-e60709b78248768fb6a36a2cabf713ece3887f86.tar.gz gcc-e60709b78248768fb6a36a2cabf713ece3887f86.tar.bz2 |
[Ada] Fix formal parameters list for secondary stack allocation procedure
The introduction of the Alignment parameter for the secondary stack
allocator in previous change was missing the corresponding change in the
Build_Allocate_Deallocate_Proc when creating the formal parameters list.
gcc/ada/
* exp_util.adb (Build_Allocate_Deallocate_Proc): Add
Alignment_Param in the formal list for calls to SS_Allocate.
-rw-r--r-- | gcc/ada/exp_util.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/exp_util.adb b/gcc/ada/exp_util.adb index 0bc22a4..61395ad 100644 --- a/gcc/ada/exp_util.adb +++ b/gcc/ada/exp_util.adb @@ -1293,7 +1293,8 @@ package body Exp_Util is -- Gigi expects a different profile in the Secondary_Stack_Pool -- case. There must be no uses of the two missing formals -- (i.e., Pool_Param and Alignment_Param) in this case. - Formal_Params := New_List (Address_Param, Size_Param); + Formal_Params := New_List + (Address_Param, Size_Param, Alignment_Param); else Formal_Params := New_List ( Pool_Param, Address_Param, Size_Param, Alignment_Param); |