URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc3/] [gcc/] [ada/] [a-astaco.ads] - Rev 281
Go to most recent revision | Compare with Previous | Blame | View Log
------------------------------------------------------------------------------ -- -- -- GNAT RUN-TIME COMPONENTS -- -- -- -- A D A . A S Y N C H R O N O U S _ T A S K _ C O N T R O L -- -- -- -- S p e c -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. In accordance with the copyright of that document, you can freely -- -- copy and modify this specification, provided that if you redistribute a -- -- modified version, any changes that you have made are clearly indicated. -- -- -- ------------------------------------------------------------------------------ -- This unit is not implemented in typical GNAT implementations that lie on -- top of operating systems, because it is infeasible to implement in such -- environments. The RM anticipates this situation (RM D.11(10)), and permits -- an implementation to leave this unimplemented even if the Real-Time Systems -- annex is fully supported. -- If a target environment provides appropriate support for this package, then -- the Unimplemented_Unit pragma should be removed from this spec, and an -- appropriate body provided. The framework for such a body is included in the -- distributed sources. with Ada.Task_Identification; package Ada.Asynchronous_Task_Control is pragma Preelaborate_05; -- In accordance with Ada 2005 AI-362 pragma Unimplemented_Unit; procedure Hold (T : Ada.Task_Identification.Task_Id); procedure Continue (T : Ada.Task_Identification.Task_Id); function Is_Held (T : Ada.Task_Identification.Task_Id) return Boolean; end Ada.Asynchronous_Task_Control;
Go to most recent revision | Compare with Previous | Blame | View Log