summaryrefslogtreecommitdiff
path: root/gcc/ada/s-tassta.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-22 12:12:36 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-22 12:12:36 +0000
commitd4a4c26e617f5e85629447dc32f8555252c0282b (patch)
treeefc41e88390f6c9f02a7590b7713256f67e41a3d /gcc/ada/s-tassta.adb
parentb2ee26d5ec4780a243a5a6bbeff15011ef7fc5a8 (diff)
downloadgcc-d4a4c26e617f5e85629447dc32f8555252c0282b.tar.gz
2009-04-22 Robert Dewar <dewar@adacore.com>
* prj.adb: Minor code reorganization Code clean up. * prj-proc.adb: Minor code reorganization, clean up. * prj-nmsc.adb: Minor reformatting Minor code reorganization * gnat_ugn.texi: Add to doc on strict aliasing 2009-04-22 Pascal Obry <obry@adacore.com> * s-osinte-mingw.ads: Rename Reserved field in CRITICAL_SECTION to SpinCount. * s-tasini.adb: Minor reformatting. * s-tassta.adb: Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146573 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/s-tassta.adb')
-rw-r--r--gcc/ada/s-tassta.adb3
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/s-tassta.adb b/gcc/ada/s-tassta.adb
index 84281cf827f..62aee276f71 100644
--- a/gcc/ada/s-tassta.adb
+++ b/gcc/ada/s-tassta.adb
@@ -515,8 +515,7 @@ package body System.Tasking.Stages is
raise Program_Error with "potentially blocking operation";
end if;
- pragma Debug
- (Debug.Trace (Self_ID, "Create_Task", 'C'));
+ pragma Debug (Debug.Trace (Self_ID, "Create_Task", 'C'));
if Priority = Unspecified_Priority then
Base_Priority := Self_ID.Common.Base_Priority;