diff options
Diffstat (limited to 'gcc/ada/s-tassta.ads')
| -rw-r--r-- | gcc/ada/s-tassta.ads | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/ada/s-tassta.ads b/gcc/ada/s-tassta.ads index 6b8c7d7df3b..9058d068a4a 100644 --- a/gcc/ada/s-tassta.ads +++ b/gcc/ada/s-tassta.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2010, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2011, 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- -- @@ -172,6 +172,7 @@ package System.Tasking.Stages is Task_Info : System.Task_Info.Task_Info_Type; CPU : Integer; Relative_Deadline : Ada.Real_Time.Time_Span; + Domain : Dispatching_Domain_Access; Num_Entries : Task_Entry_Index; Master : Master_Level; State : Task_Procedure_Access; @@ -195,6 +196,8 @@ package System.Tasking.Stages is -- before setting the affinity at run time. -- Relative_Deadline is the relative deadline associated with the created -- task by means of a pragma Relative_Deadline, or 0.0 if none. + -- Domain is the dispatching domain associated with the created task by + -- means of a Dispatching_Domain pragma or aspect, or null if none. -- State is the compiler generated task's procedure body -- Discriminants is a pointer to a limited record whose discriminants -- are those of the task to create. This parameter should be passed as |