diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-03 08:32:57 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-03 08:32:57 +0000 |
| commit | 1ae09faf95d176592771bfea4c47aee3fa3645be (patch) | |
| tree | 834b7da4b7d5b685e4e2c9e4b200ee9d3e306393 /gcc/ada/s-tasinf-vxworks.ads | |
| parent | 700315b91cd7af93dfa463a671bb615a9cd9bfae (diff) | |
| download | gcc-1ae09faf95d176592771bfea4c47aee3fa3645be.tar.gz | |
2011-08-03 Olivier Hainque <hainque@adacore.com>
* tracebak.c (STOP_FRAME ppc AIX): Stop at null return address as well.
2011-08-03 Ed Schonberg <schonberg@adacore.com>
* sem_ch8.adb (Analyze_Object_Renaming): if the renamed object is an
explicit dereference of an unconstrained type, create a constrained
subtype for it, as is done for function calls that return an
unconstrained type.
2011-08-03 Thomas Quinot <quinot@adacore.com>
* g-pehage.adb (Finalize): Avoid possible double-free.
2011-08-03 Steve Baird <baird@adacore.com>
* exp_attr.adb (Expand_N_Attribute_Reference): Don't expand
Elab_Spec/Body attrs in CodePeer_Mode.
2011-08-03 Javier Miranda <miranda@adacore.com>
* exp_aggr.adb (Flatten): Convert to positional form aggregates whose
low bound is not known at compile time but they have no others choice.
Done because in this case the bounds can be obtained directly from the
aggregate.
2011-08-03 Ed Falis <falis@adacore.com>
* s-tasinf-vxworks.ads: Update comment to reflect 0 indexing of CPUs
on VxWorks SMP. Remove unusable constant ANY_CPU.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177242 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-tasinf-vxworks.ads')
| -rw-r--r-- | gcc/ada/s-tasinf-vxworks.ads | 7 |
1 files changed, 2 insertions, 5 deletions
diff --git a/gcc/ada/s-tasinf-vxworks.ads b/gcc/ada/s-tasinf-vxworks.ads index 18b2ad42703..db6bc56af60 100644 --- a/gcc/ada/s-tasinf-vxworks.ads +++ b/gcc/ada/s-tasinf-vxworks.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2009, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2011, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -76,10 +76,7 @@ package System.Task_Info is ------------------ subtype Task_Info_Type is Interfaces.C.int; - -- This is a CPU number (positive) - - Any_CPU : constant Task_Info_Type := 0; - -- Allow task to run on any CPU + -- This is a CPU number (natural - CPUs are 0-indexed on VxWorks) use type Interfaces.C.int; |