diff options
| author | Eric Botcazou <ebotcazou@adacore.com> | 2009-11-23 14:56:58 +0000 |
|---|---|---|
| committer | Laurent Guerby <guerby@gcc.gnu.org> | 2009-11-23 14:56:58 +0000 |
| commit | a7194bfea995c4bfc8f01ce18e36ef8bda7ebe16 (patch) | |
| tree | 95a5c8e808a83305f6684ff799d355fecbaf01f8 /gcc/ada/s-osinte-solaris.ads | |
| parent | aa373032bfd895dc6eb671308b68163f2971ffd2 (diff) | |
| download | gcc-a7194bfea995c4bfc8f01ce18e36ef8bda7ebe16.zip gcc-a7194bfea995c4bfc8f01ce18e36ef8bda7ebe16.tar.gz gcc-a7194bfea995c4bfc8f01ce18e36ef8bda7ebe16.tar.bz2 | |
re PR ada/42153 (s-osinte.adb:46:21: missing body for "To_Duration" declared at s-osinte.ads:216)
2009-11-23 Eric Botcazou <ebotcazou@adacore.com>
Laurent GUERBY <laurent@guerby.net>
PR ada/42153
* s-osinte-linux.ads (struct_timeval): Delete.
* s-osinte-hpux.ads (struct_timeval, To_Duration, To_Timeval):
Delete.
* s-osinte-kfreebsd-gnu.ads: Likewise.
* s-osinte-rtems.ads: Likewise.
* s-osinte-aix.ads: Likewise.
* s-osinte-hpux-dce.ads: Likewise.
* s-osinte-darwin.ads: Likewise.
* s-osinte-solaris-posix.ads: Likewise.
* s-osinte-irix.ads: Likewise.
* s-osinte-solaris.ads: Likewise.
* s-osinte-hpux-dce.adb (To_Duration, To_Timeval): Delete.
* s-osinte-irix.adb: Likewise.
* s-osinte-solaris.adb: Likewise.
* s-osinte-rtems.adb: Likewise. Minor reformatting.
* s-osinte-aix.adb (To_Duration, To_Timeval): Delete.
(clock_gettime): Use cal.c timeval_to_duration.
* s-osinte-darwin.adb: Likewise.
Co-Authored-By: Laurent GUERBY <laurent@guerby.net>
From-SVN: r154446
Diffstat (limited to 'gcc/ada/s-osinte-solaris.ads')
| -rw-r--r-- | gcc/ada/s-osinte-solaris.ads | 16 |
1 files changed, 0 insertions, 16 deletions
diff --git a/gcc/ada/s-osinte-solaris.ads b/gcc/ada/s-osinte-solaris.ads index a937f6e..0728b18 100644 --- a/gcc/ada/s-osinte-solaris.ads +++ b/gcc/ada/s-osinte-solaris.ads @@ -263,16 +263,6 @@ package System.OS_Interface is function To_Timespec (D : Duration) return timespec; pragma Inline (To_Timespec); - type struct_timeval is private; - -- This is needed on systems that do not have clock_gettime() - -- but do have gettimeofday(). - - function To_Duration (TV : struct_timeval) return Duration; - pragma Inline (To_Duration); - - function To_Timeval (D : Duration) return struct_timeval; - pragma Inline (To_Timeval); - ------------- -- Process -- ------------- @@ -528,12 +518,6 @@ private type clockid_t is new int; CLOCK_REALTIME : constant clockid_t := 0; - type struct_timeval is record - tv_sec : long; - tv_usec : long; - end record; - pragma Convention (C, struct_timeval); - type array_type_9 is array (0 .. 3) of unsigned_char; type record_type_3 is record flag : array_type_9; |