summaryrefslogtreecommitdiff
path: root/gcc/ada/g-stseme.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/g-stseme.adb')
-rw-r--r--gcc/ada/g-stseme.adb5
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/g-stseme.adb b/gcc/ada/g-stseme.adb
index c47adc8be35..2e797b09a6e 100644
--- a/gcc/ada/g-stseme.adb
+++ b/gcc/ada/g-stseme.adb
@@ -34,7 +34,7 @@
-- since on that platform socket errno values are distinct from the system
-- ones: there is a specific variant of this function in g-socthi-mingw.adb.
-with System.CRTL;
+with System.CRTL.Runtime;
separate (GNAT.Sockets.Thin)
@@ -46,7 +46,8 @@ function Socket_Error_Message
(Errno : Integer) return C.Strings.chars_ptr
is
use type Interfaces.C.Strings.chars_ptr;
- C_Msg : constant C.Strings.chars_ptr := System.CRTL.strerror (Errno);
+ C_Msg : constant C.Strings.chars_ptr :=
+ System.CRTL.Runtime.strerror (Errno);
begin
if C_Msg = C.Strings.Null_Ptr then