Control: tags -1 + patch
Hello,
Samuel Thibault, le Tue 07 Apr 2015 00:05:01 +0200, a écrit :
> Matthias Klose, le Sun 29 Mar 2015 21:44:37 +0200, a écrit :
> > this looks like the same issue as for kfreebsd. help would be appreciated.
> >
> > https://bugs.debian.org/cgi-bin/bugreport.cgi?bug=781424
>
> I'm currently trying to build a simple fix: copy/paste the clock_getres
> C interface from Linux, as can be read in the attached patch.
Yes, this fixes the issue for hurd-i386, and will very probably fix it
for kfreebsd-* too.
Samuel
Index: debian/patches/ada-hurd.diff
===================================================================
--- debian/patches/ada-hurd.diff (révision 7956)
+++ debian/patches/ada-hurd.diff (copie de travail)
@@ -2,7 +2,7 @@
===================================================================
--- /dev/null
+++ b/src/gcc/ada/s-osinte-gnu.ads
-@@ -0,0 +1,797 @@
+@@ -0,0 +1,802 @@
+------------------------------------------------------------------------------
+-- --
+-- GNU ADA RUN-TIME LIBRARY (GNARL) COMPONENTS --
@@ -226,6 +226,11 @@
+ return int;
+ pragma Import (C, clock_gettime, "clock_gettime");
+
++ function clock_getres
++ (clock_id : clockid_t;
++ res : access timespec) return int;
++ pragma Import (C, clock_getres, "clock_getres");
++
+ function To_Duration (TS : timespec) return Duration;
+ pragma Inline (To_Duration);
+
Index: debian/patches/ada-kfreebsd.diff
===================================================================
--- debian/patches/ada-kfreebsd.diff (révision 7956)
+++ debian/patches/ada-kfreebsd.diff (copie de travail)
@@ -220,6 +220,18 @@
function clock_gettime
(clock_id : clockid_t;
+@@ -216,6 +215,11 @@
+ return int;
+ pragma Import (C, clock_gettime, "clock_gettime");
+
++ function clock_getres
++ (clock_id : clockid_t;
++ res : access timespec) return int;
++ pragma Import (C, clock_getres, "clock_getres");
++
+ function To_Duration (TS : timespec) return Duration;
+ pragma Inline (To_Duration);
+
@@ -252,6 +251,16 @@ package System.OS_Interface is
function getpid return pid_t;
pragma Import (C, getpid, "getpid");
