diff options
| author | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-04-09 23:18:28 +0000 |
|---|---|---|
| committer | ebotcazou <ebotcazou@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-04-09 23:18:28 +0000 |
| commit | 1dc6e7854d751c7396cc063e7548905a15eb8536 (patch) | |
| tree | 0de2bc8f0a3af7e345f4001d721f20ff6b8c549a /gcc/ada/s-osprim-x32.adb | |
| parent | 7c9e467e75a8793a3f444014a8f93af500c24075 (diff) | |
| download | gcc-1dc6e7854d751c7396cc063e7548905a15eb8536.tar.gz | |
PR ada/54040
PR ada/59346
* s-osinte-x32.adb (To_Timespec): Add use directive.
* s-osprim-x32.ads (Clock): Adjust.
(To_Timespec): Likewise.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@209257 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-osprim-x32.adb')
| -rw-r--r-- | gcc/ada/s-osprim-x32.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/s-osprim-x32.adb b/gcc/ada/s-osprim-x32.adb index fb00e780fa6..e0c020c78f9 100644 --- a/gcc/ada/s-osprim-x32.adb +++ b/gcc/ada/s-osprim-x32.adb @@ -54,7 +54,7 @@ package body System.OS_Primitives is ----------- function Clock return Duration is - type timeval is array (1 .. 2) of time_t; + type timeval is array (1 .. 2) of Long_Long_Integer; procedure timeval_to_duration (T : not null access timeval; @@ -118,7 +118,7 @@ package body System.OS_Primitives is return timespec'(tv_sec => S, - tv_nsec => time_t (Long_Long_Integer (F * 10#1#E9))); + tv_nsec => Long_Long_Integer (F * 10#1#E9)); end To_Timespec; ----------------- |