diff mbox series

Ada, libgnarl: Fix s-taprop__posix.adb compilation.

Message ID 20240807155544.16367-1-iain@sandoe.co.uk
State New
Headers show
Series Ada, libgnarl: Fix s-taprop__posix.adb compilation. | expand

Commit Message

Iain Sandoe Aug. 7, 2024, 3:55 p.m. UTC
Tested on x86_64-darwin21, OK for trunk?
thanks
Iain

--- 8< ---

Bootstrap on Darwin, and likely any other targets using the posix
implementation of s-taprop was broken by commits between r15-2743
and r15-2747:
s-taprop.adb:297:15: error: "size_t" is not visible
s-taprop.adb:297:15: error: multiple use clauses cause hiding
s-taprop.adb:297:15: error: hidden declaration at s-osinte.ads:58
s-taprop.adb:297:15: error: hidden declaration at i-c.ads:9

This seems to be caused by an omitted change to use Interfaces.C.size_t
instead of just size_t.  Fixed thus.

gcc/ada/ChangeLog:

	* libgnarl/s-taprop__posix.adb (Stack_Guard): Use Interfaces.C.size_t
	for the type of Page_Size.

Signed-off-by: Iain Sandoe <iain@sandoe.co.uk>
---
 gcc/ada/libgnarl/s-taprop__posix.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

Comments

Marc Poulhiès Aug. 8, 2024, 7:51 a.m. UTC | #1
Iain Sandoe <iains.gcc@gmail.com> writes:

Hello,

> Tested on x86_64-darwin21, OK for trunk?

Yes, thanks!
Marc
diff mbox series

Patch

diff --git a/gcc/ada/libgnarl/s-taprop__posix.adb b/gcc/ada/libgnarl/s-taprop__posix.adb
index 3d76679ad4a..5f6a4d69c91 100644
--- a/gcc/ada/libgnarl/s-taprop__posix.adb
+++ b/gcc/ada/libgnarl/s-taprop__posix.adb
@@ -294,7 +294,7 @@  package body System.Task_Primitives.Operations is
          Res :=
            mprotect
              (Stack_Base - (Stack_Base mod Page_Size) + Page_Size,
-              size_t (Page_Size),
+              Interfaces.C.size_t (Page_Size),
               prot => (if On then PROT_ON else PROT_OFF));
          pragma Assert (Res = 0);
       end if;