aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sysdep.c
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-07-22 15:16:44 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-07-22 15:16:44 +0200
commit09494c325c52f55c72ab1448371ab03d25e13c50 (patch)
tree4c7ca77d2f10ec5949c3ff7d39427f1f605f2c5f /gcc/ada/sysdep.c
parent5a989c6ba5e462a5545f2fd853df3aac24879440 (diff)
downloadgcc-09494c325c52f55c72ab1448371ab03d25e13c50.zip
gcc-09494c325c52f55c72ab1448371ab03d25e13c50.tar.gz
gcc-09494c325c52f55c72ab1448371ab03d25e13c50.tar.bz2
[multiple changes]
2009-07-22 Brett Porter <porter@adacore.com> * init.c (__gnat_init_float): For SPE, set bits in SPEFSCR instead of FPSCR. * sysdep.c (__gnat_get_task_options): Set task option enabling SPE. 2009-07-22 Gary Dismukes <dismukes@adacore.com> * exp_ch5.adb, sem_util.adb, sem_attr.adb, exp_dbug.ads, exp_ch2.adb, exp_tss.ads, exp_ch4.adb, sem_ch4.adb: Correct spelling error. Minor reformatting. * sem_res.adb (Resolve_Explicit_Dereference): Reword one comment that used poor terminology. 2009-07-22 Robert Dewar <dewar@adacore.com> * freeze.adb, sem_ch3.adb, sem_prag.adb: Minor reformatting * sem_eval.adb, exp_tss.adb: Minor comment update. * stylesw.adb: Code clean up. From-SVN: r149932
Diffstat (limited to 'gcc/ada/sysdep.c')
-rw-r--r--gcc/ada/sysdep.c6
1 files changed, 5 insertions, 1 deletions
diff --git a/gcc/ada/sysdep.c b/gcc/ada/sysdep.c
index a27c147..a60b83e 100644
--- a/gcc/ada/sysdep.c
+++ b/gcc/ada/sysdep.c
@@ -940,7 +940,8 @@ __gnat_localtime_tzoff (const time_t *timer, long *off)
function returns the options to be set when creating a new task. It fetches
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. */
+ because it is almost always required. On processors with the SPE
+ category, VX_SPE_TASK is needed to enable the SPE. */
extern int __gnat_get_task_options (void);
int
@@ -953,6 +954,9 @@ __gnat_get_task_options (void)
/* Force VX_FP_TASK because it is almost always required */
options |= VX_FP_TASK;
+#if defined (_SPE_)
+ options |= VX_SPE_TASK;
+#endif
/* Mask those bits that are not under user control */
#ifdef VX_USR_TASK_OPTIONS