diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-21 13:03:53 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-12-21 13:03:53 +0100 |
| commit | dea1d3dcea17dfb21bf403133dcc6acd0cad6c29 (patch) | |
| tree | f290fe9b936622bd1e571848a07a44ee941fb7c7 /gcc/ada/init.c | |
| parent | 88115c2a3945dd9eaf0807385e1cd27c298d3d08 (diff) | |
| download | gcc-dea1d3dcea17dfb21bf403133dcc6acd0cad6c29.zip gcc-dea1d3dcea17dfb21bf403133dcc6acd0cad6c29.tar.gz gcc-dea1d3dcea17dfb21bf403133dcc6acd0cad6c29.tar.bz2 | |
[multiple changes]
2011-12-21 Thomas Quinot <quinot@adacore.com>
* thread.c, s-oscons-tmplt.c, init.c (pthread_condattr_setclock): For
AIX 5.2, define as a dummy weak symbol in init.c.
(CLOCK_RT_Ada): Set to CLOCK_MONOTONIC on all versions of AIX.
2011-12-21 Thomas Quinot <quinot@adacore.com>
* snames.ads-tmpl, sem_ch8.adb: Minor reformatting.
* sem_prag.adb: Minor comment clarification.
2011-12-21 Vincent Celier <celier@adacore.com>
* prj-nmsc.adb (Report_No_Sources): New argument Lang for the
language name as a Name_Id. Do not report no sources if language
is not allowed.
(Add_Source): Do not add source if language is not allowed.
* prj.adb (Add_Restricted_Language): New procedure
(Is_Allowed_Language): New function
* prj.ads (Add_Restricted_Language): New procedure
(Is_Allowed_Language): New function
From-SVN: r182577
Diffstat (limited to 'gcc/ada/init.c')
| -rw-r--r-- | gcc/ada/init.c | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gcc/ada/init.c b/gcc/ada/init.c index cc6c1d2..9c11d6b 100644 --- a/gcc/ada/init.c +++ b/gcc/ada/init.c @@ -219,6 +219,19 @@ nanosleep (struct timestruc_t *Rqtp, struct timestruc_t *Rmtp) #endif /* _AIXVERSION_430 */ +/* Version of AIX before 5.3 don't have pthread_condattr_setclock: + * supply it as a weak symbol here so that if linking on a 5.3 or newer + * machine, we get the real one. + */ + +#ifndef _AIXVERSION_530 +#pragma weak pthread_condattr_setclock +int +pthread_condattr_setclock (pthread_condattr_t *attr, clockid_t cl) { + return 0; +} +#endif + static void __gnat_error_handler (int sig, siginfo_t *si ATTRIBUTE_UNUSED, |