diff options
| -rw-r--r-- | gcc/ada/gnatdll.adb | 6 | ||||
| -rw-r--r-- | gcc/ada/memroot.adb | 1 |
2 files changed, 2 insertions, 5 deletions
diff --git a/gcc/ada/gnatdll.adb b/gcc/ada/gnatdll.adb index c15154301cc..d133cf6e21e 100644 --- a/gcc/ada/gnatdll.adb +++ b/gcc/ada/gnatdll.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1997-2004, Free Software Foundation, Inc. -- +-- Copyright (C) 1997-2005, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -63,7 +63,7 @@ procedure Gnatdll is -- build the DLL. Help : Boolean := False; - -- Help will be set to True the usage information is to be displayed. + -- Help will be set to True the usage information is to be displayed Version : constant String := Gnatvsn.Gnat_Version_String; -- Why should it be necessary to make a copy of this @@ -166,8 +166,6 @@ procedure Gnatdll is procedure Parse_Command_Line is - use GNAT.Command_Line; - procedure Add_File (Filename : in String); -- Add one file to the list of file to handle diff --git a/gcc/ada/memroot.adb b/gcc/ada/memroot.adb index fa4819cbe83..cdd4feb0009 100644 --- a/gcc/ada/memroot.adb +++ b/gcc/ada/memroot.adb @@ -27,7 +27,6 @@ with GNAT.Table; with GNAT.HTable; use GNAT.HTable; with Ada.Text_IO; use Ada.Text_IO; -with System.Storage_Elements; use System.Storage_Elements; package body Memroot is |