File : a-intnam-xi-ppc.ads
1 ------------------------------------------------------------------------------
2 -- --
3 -- GNAT RUN-TIME COMPONENTS --
4 -- --
5 -- A D A . I N T E R R U P T S . N A M E S --
6 -- --
7 -- S p e c --
8 -- --
9 -- Copyright (C) 2011, Free Software Foundation, Inc. --
10 -- --
11 -- GNAT is free software; you can redistribute it and/or modify it under --
12 -- terms of the GNU General Public License as published by the Free Soft- --
13 -- ware Foundation; either version 3, or (at your option) any later ver- --
14 -- sion. GNAT is distributed in the hope that it will be useful, but WITH- --
15 -- OUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY --
16 -- or FITNESS FOR A PARTICULAR PURPOSE. --
17 -- --
18 -- --
19 -- --
20 -- --
21 -- --
22 -- You should have received a copy of the GNU General Public License and --
23 -- a copy of the GCC Runtime Library Exception along with this program; --
24 -- see the files COPYING3 and COPYING.RUNTIME respectively. If not, see --
25 -- <http://www.gnu.org/licenses/>. --
26 -- --
27 ------------------------------------------------------------------------------
28
29 -- This is a generic definition only for the external interrupts
30
31 package Ada.Interrupts.Names is
32
33 -- All identifiers in this unit are implementation defined
34
35 pragma Implementation_Defined;
36
37 External_Interrupt_1 : constant Interrupt_ID := 1;
38 External_Interrupt_1_Priority : constant System.Interrupt_Priority :=
39 System.Interrupt_Priority'First;
40
41 External_Interrupt_2 : constant Interrupt_ID := 2;
42 External_Interrupt_2_Priority : constant System.Interrupt_Priority :=
43 System.Interrupt_Priority'First;
44
45 External_Interrupt_3 : constant Interrupt_ID := 3;
46 External_Interrupt_3_Priority : constant System.Interrupt_Priority :=
47 System.Interrupt_Priority'First;
48
49 External_Interrupt_4 : constant Interrupt_ID := 4;
50 External_Interrupt_4_Priority : constant System.Interrupt_Priority :=
51 System.Interrupt_Priority'First;
52
53 External_Interrupt_5 : constant Interrupt_ID := 5;
54 External_Interrupt_5_Priority : constant System.Interrupt_Priority :=
55 System.Interrupt_Priority'First;
56
57 External_Interrupt_6 : constant Interrupt_ID := 6;
58 External_Interrupt_6_Priority : constant System.Interrupt_Priority :=
59 System.Interrupt_Priority'First;
60
61 External_Interrupt_7 : constant Interrupt_ID := 7;
62 External_Interrupt_7_Priority : constant System.Interrupt_Priority :=
63 System.Interrupt_Priority'First;
64
65 External_Interrupt_8 : constant Interrupt_ID := 8;
66 External_Interrupt_8_Priority : constant System.Interrupt_Priority :=
67 System.Interrupt_Priority'First;
68
69 External_Interrupt_9 : constant Interrupt_ID := 9;
70 External_Interrupt_9_Priority : constant System.Interrupt_Priority :=
71 System.Interrupt_Priority'First;
72
73 External_Interrupt_10 : constant Interrupt_ID := 10;
74 External_Interrupt_10_Priority : constant System.Interrupt_Priority :=
75 System.Interrupt_Priority'First;
76
77 External_Interrupt_11 : constant Interrupt_ID := 11;
78 External_Interrupt_11_Priority : constant System.Interrupt_Priority :=
79 System.Interrupt_Priority'First;
80
81 External_Interrupt_12 : constant Interrupt_ID := 12;
82 External_Interrupt_12_Priority : constant System.Interrupt_Priority :=
83 System.Interrupt_Priority'First;
84
85 External_Interrupt_13 : constant Interrupt_ID := 13;
86 External_Interrupt_13_Priority : constant System.Interrupt_Priority :=
87 System.Interrupt_Priority'First;
88
89 External_Interrupt_14 : constant Interrupt_ID := 14;
90 External_Interrupt_14_Priority : constant System.Interrupt_Priority :=
91 System.Interrupt_Priority'First;
92
93 External_Interrupt_15 : constant Interrupt_ID := 15;
94 External_Interrupt_15_Priority : constant System.Interrupt_Priority :=
95 System.Interrupt_Priority'First;
96
97 External_Interrupt_16 : constant Interrupt_ID := 16;
98 External_Interrupt_16_Priority : constant System.Interrupt_Priority :=
99 System.Interrupt_Priority'First;
100
101 end Ada.Interrupts.Names;