diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-10-05 14:22:55 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-10-05 14:22:55 +0000 |
| commit | 412f75eb87eb56400fb5773c384a62dc16130155 (patch) | |
| tree | bbab37880dacc14926a40fd422bde828940a7db1 /gcc/ada/s-tassta.adb | |
| parent | 21a554371e58786b978a35f09ce5c7b077fc1272 (diff) | |
| download | gcc-412f75eb87eb56400fb5773c384a62dc16130155.tar.gz | |
2012-10-05 Robert Dewar <dewar@adacore.com>
* checks.adb, checks.ads, s-tassta.adb, s-stposu.adb, s-spsufi.adb,
s-spsufi.ads, exp_ch4.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@192125 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-tassta.adb')
| -rw-r--r-- | gcc/ada/s-tassta.adb | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/gcc/ada/s-tassta.adb b/gcc/ada/s-tassta.adb index 0b4a742ec1f..08886c157bb 100644 --- a/gcc/ada/s-tassta.adb +++ b/gcc/ada/s-tassta.adb @@ -1905,11 +1905,11 @@ package body System.Tasking.Stages is C := All_Tasks_List; P := null; while C /= null loop - -- If Free_On_Termination is set, do nothing here, and let - -- the task free itself if not already done, otherwise we - -- risk a race condition where Vulnerable_Free_Task is called - -- in the loop below, while the task calls Free_Task itself, - -- in Terminate_Task. + + -- If Free_On_Termination is set, do nothing here, and let the + -- task free itself if not already done, otherwise we risk a race + -- condition where Vulnerable_Free_Task is called in the loop below, + -- while the task calls Free_Task itself, in Terminate_Task. if C.Common.Parent = Self_ID and then C.Master_of_Task >= CM |