source: rtems/c/src/ada/rtems-region.ads @ 6273201

4.115
Last change on this file since 6273201 was 9b4422a2, checked in by Joel Sherrill <joel.sherrill@…>, on 05/03/12 at 15:09:24

Remove All CVS Id Strings Possible Using a Script

Script does what is expected and tries to do it as
smartly as possible.

+ remove occurrences of two blank comment lines

next to each other after Id string line removed.

+ remove entire comment blocks which only exited to

contain CVS Ids

+ If the processing left a blank line at the top of

a file, it was removed.

  • Property mode set to 100644
File size: 2.2 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.com/license/LICENSE.
20--
21
22package RTEMS.Region is
23
24   --
25   --  Region Manager
26   --
27
28   procedure Create (
29      Name             : in     RTEMS.Name;
30      Starting_Address : in     RTEMS.Address;
31      Length           : in     RTEMS.Unsigned32;
32      Page_Size        : in     RTEMS.Unsigned32;
33      Attribute_Set    : in     RTEMS.Attribute;
34      ID               :    out RTEMS.ID;
35      Result           :    out RTEMS.Status_Codes
36   );
37
38   procedure Ident (
39      Name   : in     RTEMS.Name;
40      ID     :    out RTEMS.ID;
41      Result :    out RTEMS.Status_Codes
42   );
43
44   procedure Delete (
45      ID     : in     RTEMS.ID;
46      Result :    out RTEMS.Status_Codes
47   );
48
49   procedure Extend (
50      ID               : in     RTEMS.ID;
51      Starting_Address : in     RTEMS.Address;
52      Length           : in     RTEMS.Unsigned32;
53      Result           :    out RTEMS.Status_Codes
54   );
55
56   procedure Get_Segment (
57      ID         : in     RTEMS.ID;
58      Size       : in     RTEMS.Unsigned32;
59      Option_Set : in     RTEMS.Option;
60      Timeout    : in     RTEMS.Interval;
61      Segment    :    out RTEMS.Address;
62      Result     :    out RTEMS.Status_Codes
63   );
64
65   procedure Get_Segment_Size (
66      ID         : in     RTEMS.ID;
67      Segment    : in     RTEMS.Address;
68      Size       :    out RTEMS.Unsigned32;
69      Result     :    out RTEMS.Status_Codes
70   );
71
72   procedure Return_Segment (
73      ID      : in     RTEMS.ID;
74      Segment : in     RTEMS.Address;
75      Result  :    out RTEMS.Status_Codes
76   );
77
78   procedure Resize_Segment (
79      ID         : in     RTEMS.ID;
80      Segment    : in     RTEMS.Address;
81      Size       : in     RTEMS.Unsigned32;
82      Old_Size   :    out RTEMS.Unsigned32;
83      Result     :    out RTEMS.Status_Codes
84   );
85
86end RTEMS.Region;
87
Note: See TracBrowser for help on using the repository browser.