source:
rtems/c/src/ada/rtems-timer.ads
@
15c1978c
Last change on this file since 15c1978c was 1987020, checked in by Joel Sherrill <joel.sherrill@…>, on 02/16/11 at 15:52:29 | |
---|---|
|
|
File size: 2.6 KB |
Line | |
---|---|
1 | -- |
2 | -- RTEMS / Specification |
3 | -- |
4 | -- DESCRIPTION: |
5 | -- |
6 | -- This package provides the interface to the RTEMS API. |
7 | -- |
8 | -- DEPENDENCIES: |
9 | -- |
10 | -- NOTES: |
11 | -- RTEMS initialization and configuration are called from |
12 | -- the BSP side, therefore should never be called from ADA. |
13 | -- |
14 | -- COPYRIGHT (c) 1997-2008. |
15 | -- On-Line Applications Research Corporation (OAR). |
16 | -- |
17 | -- The license and distribution terms for this file may in |
18 | -- the file LICENSE in this distribution or at |
19 | -- http://www.rtems.com/license/LICENSE. |
20 | -- |
21 | -- $Id$ |
22 | -- |
23 | |
24 | with RTEMS.Tasks; |
25 | |
26 | package RTEMS.Timer is |
27 | |
28 | -- |
29 | -- The following type define a pointer to a watchdog/timer service routine. |
30 | -- |
31 | |
32 | type Service_Routine is access procedure ( |
33 | ID : in RTEMS.ID; |
34 | User_Data : in RTEMS.Address |
35 | ); |
36 | pragma Convention (C, Service_Routine); |
37 | |
38 | -- |
39 | -- Timer Manager |
40 | -- |
41 | |
42 | procedure Create ( |
43 | Name : in RTEMS.Name; |
44 | ID : out RTEMS.ID; |
45 | Result : out RTEMS.Status_Codes |
46 | ); |
47 | |
48 | procedure Ident ( |
49 | Name : in RTEMS.Name; |
50 | ID : out RTEMS.ID; |
51 | Result : out RTEMS.Status_Codes |
52 | ); |
53 | |
54 | procedure Delete ( |
55 | ID : in RTEMS.ID; |
56 | Result : out RTEMS.Status_Codes |
57 | ); |
58 | |
59 | procedure Fire_After ( |
60 | ID : in RTEMS.ID; |
61 | Ticks : in RTEMS.Interval; |
62 | Routine : in RTEMS.Timer.Service_Routine; |
63 | User_Data : in RTEMS.Address; |
64 | Result : out RTEMS.Status_Codes |
65 | ); |
66 | |
67 | procedure Server_Fire_After ( |
68 | ID : in RTEMS.ID; |
69 | Ticks : in RTEMS.Interval; |
70 | Routine : in RTEMS.Timer.Service_Routine; |
71 | User_Data : in RTEMS.Address; |
72 | Result : out RTEMS.Status_Codes |
73 | ); |
74 | |
75 | procedure Fire_When ( |
76 | ID : in RTEMS.ID; |
77 | Wall_Time : in RTEMS.Time_Of_Day; |
78 | Routine : in RTEMS.Timer.Service_Routine; |
79 | User_Data : in RTEMS.Address; |
80 | Result : out RTEMS.Status_Codes |
81 | ); |
82 | |
83 | procedure Server_Fire_When ( |
84 | ID : in RTEMS.ID; |
85 | Wall_Time : in RTEMS.Time_Of_Day; |
86 | Routine : in RTEMS.Timer.Service_Routine; |
87 | User_Data : in RTEMS.Address; |
88 | Result : out RTEMS.Status_Codes |
89 | ); |
90 | |
91 | procedure Reset ( |
92 | ID : in RTEMS.ID; |
93 | Result : out RTEMS.Status_Codes |
94 | ); |
95 | |
96 | procedure Cancel ( |
97 | ID : in RTEMS.ID; |
98 | Result : out RTEMS.Status_Codes |
99 | ); |
100 | |
101 | procedure Initiate_Server ( |
102 | Server_Priority : in RTEMS.Tasks.Priority; |
103 | Stack_Size : in Unsigned32; |
104 | Attribute_Set : in RTEMS.Attribute; |
105 | Result : out RTEMS.Status_Codes |
106 | ); |
107 | |
108 | end RTEMS.Timer; |
Note: See TracBrowser
for help on using the repository browser.