Mercurial > hg > CbC > CbC_gcc
diff gcc/ada/libgnat/sequenio.ads @ 111:04ced10e8804
gcc 7
| author | kono |
|---|---|
| date | Fri, 27 Oct 2017 22:46:09 +0900 |
| parents | |
| children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/gcc/ada/libgnat/sequenio.ads Fri Oct 27 22:46:09 2017 +0900 @@ -0,0 +1,24 @@ +------------------------------------------------------------------------------ +-- -- +-- GNAT RUN-TIME COMPONENTS -- +-- -- +-- S E Q U E N T I A L _ I O -- +-- -- +-- 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. -- +-- -- +------------------------------------------------------------------------------ + +pragma Ada_2012; +-- Explicit setting of Ada 2012 mode is required here, since we want to with a +-- child unit (not possible in Ada 83 mode), and Sequential_IO is not +-- considered to be an internal unit that is automatically compiled in Ada +-- 2012 mode (since a user is allowed to redeclare Sequential_IO). + +with Ada.Sequential_IO; + +generic package Sequential_IO renames Ada.Sequential_IO;