Mercurial > hg > CbC > CbC_gcc
comparison gcc/ada/libgnat/sequenio.ads @ 111:04ced10e8804
gcc 7
| author | kono |
|---|---|
| date | Fri, 27 Oct 2017 22:46:09 +0900 |
| parents | |
| children |
comparison
equal
deleted
inserted
replaced
| 68:561a7518be6b | 111:04ced10e8804 |
|---|---|
| 1 ------------------------------------------------------------------------------ | |
| 2 -- -- | |
| 3 -- GNAT RUN-TIME COMPONENTS -- | |
| 4 -- -- | |
| 5 -- S E Q U E N T I A L _ I O -- | |
| 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 pragma Ada_2012; | |
| 17 -- Explicit setting of Ada 2012 mode is required here, since we want to with a | |
| 18 -- child unit (not possible in Ada 83 mode), and Sequential_IO is not | |
| 19 -- considered to be an internal unit that is automatically compiled in Ada | |
| 20 -- 2012 mode (since a user is allowed to redeclare Sequential_IO). | |
| 21 | |
| 22 with Ada.Sequential_IO; | |
| 23 | |
| 24 generic package Sequential_IO renames Ada.Sequential_IO; |