diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-10-31 18:12:23 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2006-10-31 18:12:23 +0000 |
| commit | d1750c7558b40fc39df2f9e20cbe9ce0c37a5bf8 (patch) | |
| tree | 69f27898f27dc92ad2fe4eace3a366b5271fc108 /gcc/ada/s-stchop.ads | |
| parent | ecbf3d7953068297861d48ee174694bb6eb79b59 (diff) | |
| download | gcc-d1750c7558b40fc39df2f9e20cbe9ce0c37a5bf8.tar.gz | |
2006-10-31 Olivier Hainque <hainque@adacore.com>
* s-stchop.ads: make this unit preelaborate. This is desirable in
general and made mandatory by the use of this unit by s-taprop which
is itself preelaborate.
* s-stchop-vxworks.adb (Set_Stack_Info, Task_Descriptor type): Add
Td_Events component.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@118320 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-stchop.ads')
| -rw-r--r-- | gcc/ada/s-stchop.ads | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/s-stchop.ads b/gcc/ada/s-stchop.ads index 7918ed42d46..cd56ac272ec 100644 --- a/gcc/ada/s-stchop.ads +++ b/gcc/ada/s-stchop.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1999-2005 Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2006, Free Software Foundation, Inc. -- -- -- -- GNARL 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- -- @@ -43,6 +43,8 @@ pragma Polling (Off); -- checking operations. It causes infinite loops and other problems. package System.Stack_Checking.Operations is + pragma Preelaborate; + procedure Update_Stack_Cache (Stack : Stack_Access); -- Set the stack cache for the current task. Note that this is only -- for optimization purposes, nothing can be assumed about the |