diff options
| author | guerby <guerby@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-23 14:56:58 +0000 |
|---|---|---|
| committer | guerby <guerby@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-11-23 14:56:58 +0000 |
| commit | 4d3b373b46f6783116567b9b9e75d316ef009201 (patch) | |
| tree | 95a5c8e808a83305f6684ff799d355fecbaf01f8 /gcc/ada/s-osinte-aix.ads | |
| parent | b08c380313684bcfc1c94802bc1a266235a1066d (diff) | |
| download | gcc-4d3b373b46f6783116567b9b9e75d316ef009201.tar.gz | |
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.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@154446 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-osinte-aix.ads')
| -rw-r--r-- | gcc/ada/s-osinte-aix.ads | 17 |
1 files changed, 0 insertions, 17 deletions
diff --git a/gcc/ada/s-osinte-aix.ads b/gcc/ada/s-osinte-aix.ads index b5de4f28ba9..b1639a77e3f 100644 --- a/gcc/ada/s-osinte-aix.ads +++ b/gcc/ada/s-osinte-aix.ads @@ -206,7 +206,6 @@ package System.OS_Interface is function clock_gettime (clock_id : clockid_t; tp : access timespec) return int; - -- AIX threads don't have clock_gettime, so use gettimeofday() instead function To_Duration (TS : timespec) return Duration; pragma Inline (To_Duration); @@ -221,16 +220,6 @@ package System.OS_Interface is pragma Convention (C, struct_timezone); type struct_timezone_ptr is access all struct_timezone; - 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); - ------------------------- -- Priority Scheduling -- ------------------------- @@ -554,12 +543,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 pthread_attr_t is new System.Address; pragma Convention (C, pthread_attr_t); -- typedef struct __pt_attr *pthread_attr_t; |