From 252a9169efef06b03061b58743be41e233a80ddb Mon Sep 17 00:00:00 2001 From: Vicente Bergas Date: Thu, 3 May 2018 19:28:49 +0200 Subject: Fix warning: use clause for package has no effect With gcc 8.1 the following message appears: warning: use clause for package "*" has no effect gnatmake: "*.adb" compilation error This patch fixes it. --- src/ghdldrv/ghdllocal.adb | 4 +--- 1 file changed, 1 insertion(+), 3 deletions(-) (limited to 'src/ghdldrv/ghdllocal.adb') diff --git a/src/ghdldrv/ghdllocal.adb b/src/ghdldrv/ghdllocal.adb index 8cbfa70eb..fbc27087e 100644 --- a/src/ghdldrv/ghdllocal.adb +++ b/src/ghdldrv/ghdllocal.adb @@ -16,7 +16,7 @@ -- Software Foundation, 59 Temple Place - Suite 330, Boston, MA -- 02111-1307, USA. with Ada.Text_IO; use Ada.Text_IO; -with Ada.Command_Line; use Ada.Command_Line; +with Ada.Command_Line; with GNAT.Directory_Operations; with Types; use Types; with Libraries; @@ -1506,8 +1506,6 @@ package body Ghdllocal is -- Convert NAME to lower cases, unless it is an extended identifier. function Convert_Name (Name : String_Access) return String_Access is - use Name_Table; - function Is_Bad_Unit_Name return Boolean is begin if Name'Length = 0 then -- cgit v1.2.3