2003-11-25 Joel Sherrill <joel@OARcorp.com>
PR 528/rtems_misc
* rtems.ads: Add task variables to Ada binding.
RCS file: /usr1/CVS/rtems/cpukit/ada/rtems.ads,v
retrieving revision 1.19.2.1
diff -u -r1.19.2.1 rtems.ads
|
|
|
897 | 897 | Note : in RTEMS.Unsigned32; |
898 | 898 | Result : out RTEMS.Status_Codes |
899 | 899 | ); |
| 900 | |
| 901 | type Task_Variable_Dtor is access procedure ( |
| 902 | Argument : in RTEMS.Address; |
| 903 | ); |
| 904 | |
| 905 | procedure Task_Variable_Add ( |
| 906 | ID : in RTEMS.ID; |
| 907 | Task_Variable : in RTEMS.Address; |
| 908 | Dtor : in RTEMS.Task_Variable_Dtor; |
| 909 | Result : out RTEMS.Status_Codes |
| 910 | ); |
| 911 | |
| 912 | procedure Task_Variable_Get ( |
| 913 | ID : in RTEMS.ID; |
| 914 | Task_Variable : out RTEMS.Address; |
| 915 | Task_Variable_Value : out RTEMS.Address; |
| 916 | Result : out RTEMS.Status_Codes |
| 917 | ); |
| 918 | |
| 919 | procedure Task_Variable_Delete ( |
| 920 | ID : in RTEMS.ID; |
| 921 | Task_Variable : out RTEMS.Address; |
| 922 | Result : out RTEMS.Status_Codes |
| 923 | ); |
900 | 924 | |
901 | 925 | procedure Task_Wake_When ( |
902 | 926 | Time_Buffer : in RTEMS.Time_Of_Day; |