1------------------------------------------------------------------------------ 2-- -- 3-- GNAT RUN-TIME COMPONENTS -- 4-- -- 5-- D I R E C T _ 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 16pragma 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 Direct_IO is not considered 19-- to be an internal unit that is automatically compiled in Ada 2012 mode 20-- (since a user is allowed to redeclare Direct_IO). 21 22with Ada.Direct_IO; 23 24generic package Direct_IO renames Ada.Direct_IO; 25