]> git.ipfire.org Git - thirdparty/gcc.git/commitdiff
Ada, libgnarl: Fix s-taprop__posix.adb compilation.
authorIain Sandoe <iain@sandoe.co.uk>
Wed, 7 Aug 2024 12:35:17 +0000 (13:35 +0100)
committerIain Sandoe <iain@sandoe.co.uk>
Thu, 8 Aug 2024 08:24:56 +0000 (09:24 +0100)
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

index 3d76679ad4a384e313f65d3057bc4bc55c62873c..5f6a4d69c91f2f21a85b693b7a6140e4e6a5487a 100644 (file)
@@ -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;