diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-12-12 11:49:31 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-12-12 11:49:31 +0000 |
| commit | 693b08225e50adb104ff6da9a4fdb918bb9de908 (patch) | |
| tree | c5a05d81342446366f864e0be7b46fe5f6196617 /gcc/ada/sysdep.c | |
| parent | 309c3053481b62acea44176015e6ee2eea218a12 (diff) | |
2011-12-12 Thomas Quinot <quinot@adacore.com>
* exp_disp.adb: Minor reformatting.
2011-12-12 Tristan Gingold <gingold@adacore.com>
* gnatls.adb (Search_RTS): New procedure.
(Scan_Ls_Arg): Move code that search the RTS.
(Gnatls): search the RTS later.
* prj-env.ads, prj-env.adb (Get_Runtime_Path): New function.
2011-12-12 Ed Falis <falis@adacore.com>
* sysdep.c: Fix treatment of VxWorks task options so that run-times
built with __SPE__ get option VX_SPE_TASK while others get VX_FP_TASK.
2011-12-12 Bob Duff <duff@adacore.com>
* sem_type.adb, sem_type.ads, sem_ch4.adb, treepr.adb, treepr.ads:
Minor cleanup and fiddling with debug printouts.
2011-12-12 Vincent Celier <celier@adacore.com>
* prj-nmsc.adb (Get_Directories): For a non extending project,
always get a declared object and/or exec directory if it already
exists, even when there are no sources, but do not create them.
2011-12-12 Bob Duff <duff@adacore.com>
* sem_res.adb (Resolve): Deal with the case where an abstract
operator is called with operands of type universal_integer.
2011-12-12 Thomas Quinot <quinot@adacore.com>
* par_sco.adb: Minor fix to dominance marker referencing WHILE
decision.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@182227 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sysdep.c')
| -rw-r--r-- | gcc/ada/sysdep.c | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/gcc/ada/sysdep.c b/gcc/ada/sysdep.c index 2b99a32b132..fbb4a00809a 100644 --- a/gcc/ada/sysdep.c +++ b/gcc/ada/sysdep.c @@ -850,7 +850,7 @@ __gnat_localtime_tzoff (const time_t *timer, long *off) the options assigned to the current task (parent), so offering some user level control over the options for a task hierarchy. It forces VX_FP_TASK because it is almost always required. On processors with the SPE - category, VX_SPE_TASK is needed to enable the SPE. */ + category, VX_SPE_TASK should be used instead to enable the SPE. */ extern int __gnat_get_task_options (void); int @@ -861,10 +861,11 @@ __gnat_get_task_options (void) /* Get the options for the task creator */ taskOptionsGet (taskIdSelf (), &options); - /* Force VX_FP_TASK because it is almost always required */ - options |= VX_FP_TASK; -#if defined (__SPE__) && (! defined (__VXWORKSMILS__)) + /* Force VX_FP_TASK or VX_SPE_TASK as needed */ +#if defined (__SPE__) options |= VX_SPE_TASK; +#else + options |= VX_FP_TASK; #endif /* Mask those bits that are not under user control */ |