diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-11 10:44:15 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2010-10-11 10:44:15 +0200 |
| commit | 313d6f2c343c47b112863540d468d905d82a070b (patch) | |
| tree | 27810ad9b311e93596255bce29ceb7fd146eba9e /gcc/ada/adaint.c | |
| parent | 7b53cb49e265d06be341de2b1729cb3c7b63fbd9 (diff) | |
| download | gcc-313d6f2c343c47b112863540d468d905d82a070b.zip gcc-313d6f2c343c47b112863540d468d905d82a070b.tar.gz gcc-313d6f2c343c47b112863540d468d905d82a070b.tar.bz2 | |
[multiple changes]
2010-10-11 Arnaud Charlet <charlet@adacore.com>
* sem_prag.adb (Check_Interrupt_Or_Attach_Handler): Do not emit error
for AI05-0033 in CodePeer mode.
2010-10-11 Robert Dewar <dewar@adacore.com>
* atree.h, atree.ads, atree.adb (Flag3): New flag (replaces Unused_1)
* csinfo.adb: Aspect_Specifications is a new special field
* einfo.adb (Flag3): New unused flag
* exp_util.adb (Insert_Actions): Add processing for
N_Aspect_Specification.
* sem.adb: Add entry for N_Aspect_Specification.
* sinfo.ads, sinfo.adb (N_Aspect_Specification): New node
(Has_Aspect_Specifications): New flag
(Permits_Aspect_Specifications): New function
(Aspect_Specifications): New function
(Set_Aspect_Specifications): New procedure
* sprint.adb (Sprint_Node): Put N_At_Clause in proper alpha order
(Sprint_Node): Add dummy entry for N_Aspect_Specification
* treepr.adb (Flag3): New flag to be listed
2010-10-11 Vincent Celier <celier@adacore.com>
* adaint.c: Minor reformatting.
From-SVN: r165279
Diffstat (limited to 'gcc/ada/adaint.c')
| -rw-r--r-- | gcc/ada/adaint.c | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/gcc/ada/adaint.c b/gcc/ada/adaint.c index b6c19de..51e2bb7 100644 --- a/gcc/ada/adaint.c +++ b/gcc/ada/adaint.c @@ -2372,17 +2372,17 @@ __gnat_number_of_cpus (void) { int cores = 1; -#if defined (linux) || defined (sun) || defined (AIX) || \ - (defined (__alpha__) && defined (_osf_)) || defined (__APPLE__) - cores = (int)sysconf(_SC_NPROCESSORS_ONLN); +#if defined (linux) || defined (sun) || defined (AIX) \ + || (defined (__alpha__) && defined (_osf_)) || defined (__APPLE__) + cores = (int) sysconf (_SC_NPROCESSORS_ONLN); #elif (defined (__mips) && defined (__sgi)) - cores = (int)sysconf(_SC_NPROC_ONLN); + cores = (int) sysconf (_SC_NPROC_ONLN); #elif defined (__hpux__) - struct pst_dynamic psd; - if (pstat_getdynamic(&psd, sizeof(psd), 1, 0) != -1) - cores = (int)psd.psd_proc_cnt; + struct pst_dynamic psd; + if (pstat_getdynamic (&psd, sizeof (psd), 1, 0) != -1) + cores = (int) psd.psd_proc_cnt; #endif |