summaryrefslogtreecommitdiff
path: root/gcc/ada/makegpr.adb
diff options
context:
space:
mode:
authorEd Schonberg <schonberg@adacore.com>2005-09-05 09:50:46 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2005-09-05 09:50:46 +0200
commitdfbe160a82072f90a9ba5b2a138f3fa83edf7ba3 (patch)
treebd5a3ff7561737b1ee8c2009f67a1fa080e2c5a7 /gcc/ada/makegpr.adb
parent826757551170eec3ec794d961b5b6dc24d1244cd (diff)
downloadgcc-dfbe160a82072f90a9ba5b2a138f3fa83edf7ba3.tar.gz
fname-sf.adb, [...]: Remove redundant use_clauses.
2005-09-01 Ed Schonberg <schonberg@adacore.com> Thomas Quinot <quinot@adacore.com> * fname-sf.adb, mlib-tgt.ads, back_end.adb, casing.adb, g-debpoo.adb, g-excact.adb, g-spipat.adb, g-spipat.ads, g-thread.adb, lib-list.adb, makeutl.adb, mlib.adb, osint.adb, par-ch10.adb, par-load.adb, prep.adb, prj.adb, prj-attr.ads, prj-env.ads, prj-err.adb, prj-err.ads, prj-ext.adb, prj-ext.ads, prj-makr.adb, prj-makr.ads, prj-pars.ads, prj-part.adb, prj-strt.adb, prj-tree.ads, prj-util.ads, sem_dist.adb, sinput-c.ads, sinput-l.ads, sinput-p.ads, styleg-c.ads, xr_tabls.adb, prj-attr-pm.ads, makegpr.adb: Remove redundant use_clauses. From-SVN: r103854
Diffstat (limited to 'gcc/ada/makegpr.adb')
-rw-r--r--gcc/ada/makegpr.adb4
1 files changed, 0 insertions, 4 deletions
diff --git a/gcc/ada/makegpr.adb b/gcc/ada/makegpr.adb
index 20df5d43644..951e77815fd 100644
--- a/gcc/ada/makegpr.adb
+++ b/gcc/ada/makegpr.adb
@@ -1688,7 +1688,6 @@ package body Makegpr is
declare
Archive : Ada.Text_IO.File_Type;
- use Ada.Text_IO;
begin
Create (Archive, Out_File, Archive_Name);
Close (Archive);
@@ -2754,7 +2753,6 @@ package body Makegpr is
Source_Id : Other_Source_Id := First_Source;
Source : Other_Source;
Dep_File : Ada.Text_IO.File_Type;
- use Ada.Text_IO;
begin
-- Create the file in Append mode, to avoid automatic insertion of
@@ -2787,8 +2785,6 @@ package body Makegpr is
Source : Other_Source;
Dep_File : Ada.Text_IO.File_Type;
- use Ada.Text_IO;
-
begin
-- Create the file in Append mode, to avoid automatic insertion of
-- an end of line if file is empty.