with Text_Io;
package body List_Package is

    procedure Get_List_Of_Files (This_List : out
                                    List_Of_File_Names) is separate;

    procedure Get_File_Name_From_List
                 (From_List : in out List_Of_File_Names;
                  Into_File_Name : out File_Name_Package.File_Name) is separate;

    function More_File_Names (In_List : in List_Of_File_Names)
                             return Boolean is separate;

end List_Package;