diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-09-05 07:48:10 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2005-09-05 07:48:10 +0000 |
| commit | 872263e868a7e9473a51782ee5dfbca6041763aa (patch) | |
| tree | f7462b20707db57d024d78ae3b2dcb8b3cdeb188 /gcc/ada/s-tasini.ads | |
| parent | d62940bfa0c906f830712fc4334d3a5d5d45c728 (diff) | |
| download | gcc-872263e868a7e9473a51782ee5dfbca6041763aa.tar.gz | |
* s-tataat.adb, a-tasatt.adb:
Replace calls to Defer/Undefer_Abortion by Defer/Undefer_Abort.
* s-tasini.ads, s-tasini.adb (Defer_Abortion, Undefer_Abortion): Moved
these procedures to body, and renamed Abort_Defer, Abort_Undefer.
(Get_Exc_Stack_Addr, Set_Exc_Stack_Addr): Removed, no
longer used.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103851 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-tasini.ads')
| -rw-r--r-- | gcc/ada/s-tasini.ads | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/gcc/ada/s-tasini.ads b/gcc/ada/s-tasini.ads index c4928d848c1..bacde3c19d5 100644 --- a/gcc/ada/s-tasini.ads +++ b/gcc/ada/s-tasini.ads @@ -120,14 +120,6 @@ package System.Tasking.Initialization is procedure Undefer_Abort_Nestable (Self_ID : Task_Id); pragma Inline (Undefer_Abort_Nestable); - -- NON-INLINE versions without Self_ID for code generated by the - -- expander and for soft links - - procedure Defer_Abortion; - procedure Undefer_Abortion; - - -- Try to phase out all uses of the above versions ??? - procedure Do_Pending_Action (Self_ID : Task_Id); -- Only call with no locks, and when Self_ID.Pending_Action = True Perform -- necessary pending actions (e.g. abort, priority change). This procedure |