diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-02 17:53:12 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-02 17:53:12 +0200 |
| commit | 113430e542916eb563a5cb770470cdf562856836 (patch) | |
| tree | 2974be55b5fc09ba483b420501389ef1fcfef1d7 | |
| parent | c2d601b81415353bc099b15095eed430a18af2d3 (diff) | |
| download | gcc-113430e542916eb563a5cb770470cdf562856836.zip gcc-113430e542916eb563a5cb770470cdf562856836.tar.gz gcc-113430e542916eb563a5cb770470cdf562856836.tar.bz2 | |
New file.
From-SVN: r177193
| -rw-r--r-- | gcc/ada/a-extiin.ads | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/gcc/ada/a-extiin.ads b/gcc/ada/a-extiin.ads new file mode 100644 index 0000000..9677c58 --- /dev/null +++ b/gcc/ada/a-extiin.ads @@ -0,0 +1,26 @@ +------------------------------------------------------------------------------ +-- -- +-- GNAT RUN-TIME COMPONENTS -- +-- -- +-- A D A . E X E C U T I O N _ T I M E . I N T E R R U P T S -- +-- -- +-- S p e c -- +-- -- +-- This specification is derived from the Ada Reference Manual for use with -- +-- GNAT. In accordance with the copyright of that document, you can freely -- +-- copy and modify this specification, provided that if you redistribute a -- +-- modified version, any changes that you have made are clearly indicated. -- +-- -- +------------------------------------------------------------------------------ + +with Ada.Interrupts; + +package Ada.Execution_Time.Interrupts is + + pragma Unimplemented_Unit; + + function Clock (Interrupt : Ada.Interrupts.Interrupt_Id) return CPU_Time; + + function Supported (Interrupt : Ada.Interrupts.Interrupt_Id) return Boolean; + +end Ada.Execution_Time.Interrupts; |