[Ada] Minor code clean up (remove unused with/use clauses)

Arnaud Charlet charlet@adacore.com
Tue Nov 15 14:29:00 GMT 2005


Committed as obvious.

2005-11-14  Pascal Obry  <obry@adacore.com>
	    Vincent Celier  <celier@adacore.com>

	* gnatdll.adb (Parse_Command_Line): Remove redundant use of
	GNAT.Command_Line.

	* memroot.adb: Remove redundant with/use clause on
	System.Storage_Elements.

-------------- next part --------------
Index: gnatdll.adb
===================================================================
--- gnatdll.adb	(revision 106884)
+++ gnatdll.adb	(working copy)
@@ -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 @@
    --  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 Parse_Command_Line is
 
-      use GNAT.Command_Line;
-
       procedure Add_File (Filename : in String);
       --  Add one file to the list of file to handle
 
Index: memroot.adb
===================================================================
--- memroot.adb	(revision 106884)
+++ memroot.adb	(working copy)
@@ -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
 


More information about the Gcc-patches mailing list