Mercurial > hg > CbC > CbC_gcc
view gcc/ada/libgnat/directio.ads @ 111:04ced10e8804
gcc 7
| author | kono |
|---|---|
| date | Fri, 27 Oct 2017 22:46:09 +0900 |
| parents | |
| children |
line wrap: on
line source
------------------------------------------------------------------------------ -- -- -- GNAT RUN-TIME COMPONENTS -- -- -- -- D I R E C T _ 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 Direct_IO is not considered -- to be an internal unit that is automatically compiled in Ada 2012 mode -- (since a user is allowed to redeclare Direct_IO). with Ada.Direct_IO; generic package Direct_IO renames Ada.Direct_IO;