source: rtems/c/src/ada/rtems-io.ads @ c499856

4.115
Last change on this file since c499856 was c499856, checked in by Chris Johns <chrisj@…>, on Mar 20, 2014 at 9:10:47 PM

Change all references of rtems.com to rtems.org.

  • Property mode set to 100644
File size: 2.3 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-2011.
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.org/license/LICENSE.
20--
21
22with System;
23with System.Storage_Elements; use System.Storage_Elements;
24with Interfaces;
25with Interfaces.C;
26
27package RTEMS.IO is
28
29   --
30   --  Input/Output Manager
31   --
32
33   procedure Register_Name (
34      Name   : in     String;
35      Major  : in     RTEMS.Device_Major_Number;
36      Minor  : in     RTEMS.Device_Minor_Number;
37      Result :    out RTEMS.Status_Codes
38   );
39
40   procedure Lookup_Name (
41      Name         : in     String;
42      Device_Info  :    out RTEMS.Driver_Name_t;
43      Result       :    out RTEMS.Status_Codes
44   );
45
46   procedure Open (
47      Major        : in     RTEMS.Device_Major_Number;
48      Minor        : in     RTEMS.Device_Minor_Number;
49      Argument     : in     RTEMS.Address;
50      Result       :    out RTEMS.Status_Codes
51   );
52   pragma Inline (Open);
53
54   procedure Close (
55      Major        : in     RTEMS.Device_Major_Number;
56      Minor        : in     RTEMS.Device_Minor_Number;
57      Argument     : in     RTEMS.Address;
58      Result       :    out RTEMS.Status_Codes
59   );
60   pragma Inline (Close);
61
62   procedure Read (
63      Major        : in     RTEMS.Device_Major_Number;
64      Minor        : in     RTEMS.Device_Minor_Number;
65      Argument     : in     RTEMS.Address;
66      Result       :    out RTEMS.Status_Codes
67   );
68   pragma Inline (Read);
69
70   procedure Write (
71      Major        : in     RTEMS.Device_Major_Number;
72      Minor        : in     RTEMS.Device_Minor_Number;
73      Argument     : in     RTEMS.Address;
74      Result       :    out RTEMS.Status_Codes
75   );
76   pragma Inline (Write);
77
78   procedure Control (
79      Major        : in     RTEMS.Device_Major_Number;
80      Minor        : in     RTEMS.Device_Minor_Number;
81      Argument     : in     RTEMS.Address;
82      Result       :    out RTEMS.Status_Codes
83   );
84   pragma Inline (Control);
85
86end RTEMS.IO;
87
Note: See TracBrowser for help on using the repository browser.