1------------------------------------------------------------------------------
2--                                                                          --
3--                 GNAT RUN-TIME LIBRARY (GNARL) 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) 1991-2011, Free Software Foundation, Inc.         --
10--                                                                          --
11-- GNARL 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-- As a special exception under Section 7 of GPL version 3, you are granted --
19-- additional permissions described in the GCC Runtime Library Exception,   --
20-- version 3.1, as published by the Free Software Foundation.               --
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-- GNARL was developed by the GNARL team at Florida State University.       --
28-- Extensive contributions were provided by Ada Core Technologies, Inc.     --
29--                                                                          --
30------------------------------------------------------------------------------
31
32--  This is a OpenVMS/Alpha version of this package
33
34--  This target-dependent package spec contains names of interrupts
35--  supported by the local system.
36
37with System.OS_Interface;
38
39package Ada.Interrupts.Names is
40
41   --  All identifiers in this unit are implementation defined
42
43   pragma Implementation_Defined;
44
45   package OS renames System.OS_Interface;
46
47   Interrupt_ID_0   : constant Interrupt_ID := OS.Interrupt_ID_0;
48   Interrupt_ID_1   : constant Interrupt_ID := OS.Interrupt_ID_1;
49   Interrupt_ID_2   : constant Interrupt_ID := OS.Interrupt_ID_2;
50   Interrupt_ID_3   : constant Interrupt_ID := OS.Interrupt_ID_3;
51   Interrupt_ID_4   : constant Interrupt_ID := OS.Interrupt_ID_4;
52   Interrupt_ID_5   : constant Interrupt_ID := OS.Interrupt_ID_5;
53   Interrupt_ID_6   : constant Interrupt_ID := OS.Interrupt_ID_6;
54   Interrupt_ID_7   : constant Interrupt_ID := OS.Interrupt_ID_7;
55   Interrupt_ID_8   : constant Interrupt_ID := OS.Interrupt_ID_8;
56   Interrupt_ID_9   : constant Interrupt_ID := OS.Interrupt_ID_9;
57   Interrupt_ID_10  : constant Interrupt_ID := OS.Interrupt_ID_10;
58   Interrupt_ID_11  : constant Interrupt_ID := OS.Interrupt_ID_11;
59   Interrupt_ID_12  : constant Interrupt_ID := OS.Interrupt_ID_12;
60   Interrupt_ID_13  : constant Interrupt_ID := OS.Interrupt_ID_13;
61   Interrupt_ID_14  : constant Interrupt_ID := OS.Interrupt_ID_14;
62   Interrupt_ID_15  : constant Interrupt_ID := OS.Interrupt_ID_15;
63   Interrupt_ID_16  : constant Interrupt_ID := OS.Interrupt_ID_16;
64   Interrupt_ID_17  : constant Interrupt_ID := OS.Interrupt_ID_17;
65   Interrupt_ID_18  : constant Interrupt_ID := OS.Interrupt_ID_18;
66   Interrupt_ID_19  : constant Interrupt_ID := OS.Interrupt_ID_19;
67   Interrupt_ID_20  : constant Interrupt_ID := OS.Interrupt_ID_20;
68   Interrupt_ID_21  : constant Interrupt_ID := OS.Interrupt_ID_21;
69   Interrupt_ID_22  : constant Interrupt_ID := OS.Interrupt_ID_22;
70   Interrupt_ID_23  : constant Interrupt_ID := OS.Interrupt_ID_23;
71   Interrupt_ID_24  : constant Interrupt_ID := OS.Interrupt_ID_24;
72   Interrupt_ID_25  : constant Interrupt_ID := OS.Interrupt_ID_25;
73   Interrupt_ID_26  : constant Interrupt_ID := OS.Interrupt_ID_26;
74   Interrupt_ID_27  : constant Interrupt_ID := OS.Interrupt_ID_27;
75   Interrupt_ID_28  : constant Interrupt_ID := OS.Interrupt_ID_28;
76   Interrupt_ID_29  : constant Interrupt_ID := OS.Interrupt_ID_29;
77   Interrupt_ID_30  : constant Interrupt_ID := OS.Interrupt_ID_30;
78   Interrupt_ID_31  : constant Interrupt_ID := OS.Interrupt_ID_31;
79
80end Ada.Interrupts.Names;
81