OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [ada/] [a-intnam.ads] - Blame information for rev 384

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 281 jeremybenn
------------------------------------------------------------------------------
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
-- This specification is derived from the Ada Reference Manual for use with --
10
-- GNAT.  In accordance with the copyright of that document, you can freely --
11
-- copy and modify this specification,  provided that if you redistribute a --
12
-- modified version,  any changes that you have made are clearly indicated. --
13
--                                                                          --
14
------------------------------------------------------------------------------
15
 
16
--  The standard implementation of this spec contains only dummy interrupt
17
--  names. These dummy entries permit checking out code for correctness of
18
--  semantics, even if interrupts are not supported.
19
 
20
--  For specific implementations that fully support interrupts, this package
21
--  spec is replaced by an implementation dependent version that defines the
22
--  interrupts available on the system.
23
 
24
package Ada.Interrupts.Names is
25
 
26
   DUMMY_INTERRUPT_1 : constant Interrupt_ID := 1;
27
   DUMMY_INTERRUPT_2 : constant Interrupt_ID := 2;
28
 
29
end Ada.Interrupts.Names;

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.