From: James Clarke Date: Thu, 4 Jul 2019 13:22:39 +0000 (+0000) Subject: s-osinte__kfreebsd-gnu.ads (clockid_t): Make type definition public. X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=5bb8f28194ee8271357051441db27decbd74d5c5;p=gcc.git s-osinte__kfreebsd-gnu.ads (clockid_t): Make type definition public. 2019-07-04 James Clarke * libgnarl/s-osinte__kfreebsd-gnu.ads (clockid_t): Make type definition public. (CLOCK_REALTIME): Make value public. From-SVN: r273080 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 45c5f39cb87..bc6f2e0ac33 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,9 @@ +2019-07-04 James Clarke + + * libgnarl/s-osinte__kfreebsd-gnu.ads (clockid_t): Make type + definition public. + (CLOCK_REALTIME): Make value public. + 2019-07-04 Javier Miranda * exp_tss.adb (Init_Proc): Adding missing support for access to diff --git a/gcc/ada/libgnarl/s-osinte__kfreebsd-gnu.ads b/gcc/ada/libgnarl/s-osinte__kfreebsd-gnu.ads index f46bbda18ea..aa6c1a86bcc 100644 --- a/gcc/ada/libgnarl/s-osinte__kfreebsd-gnu.ads +++ b/gcc/ada/libgnarl/s-osinte__kfreebsd-gnu.ads @@ -206,9 +206,8 @@ package System.OS_Interface is function nanosleep (rqtp, rmtp : access timespec) return int; pragma Import (C, nanosleep, "nanosleep"); - type clockid_t is private; - - CLOCK_REALTIME : constant clockid_t; + type clockid_t is new int; + CLOCK_REALTIME : constant clockid_t := 0; function clock_gettime (clock_id : clockid_t; @@ -607,9 +606,6 @@ private end record; pragma Convention (C, timespec); - type clockid_t is new int; - CLOCK_REALTIME : constant clockid_t := 0; - type pthread_attr_t is record detachstate : int; schedpolicy : int;