aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/prj-env.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-08-17 11:45:27 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-08-17 11:45:27 +0200
commit5568b57c5101ca0a9a38e9d080a07712946a8f54 (patch)
tree3ee3085ebea787bb050f4ad3bcc1772ec2d048c6 /gcc/ada/prj-env.adb
parent48eff283138708a8be3d3ed2ad20d34f875abbb8 (diff)
downloadgcc-5568b57c5101ca0a9a38e9d080a07712946a8f54.zip
gcc-5568b57c5101ca0a9a38e9d080a07712946a8f54.tar.gz
gcc-5568b57c5101ca0a9a38e9d080a07712946a8f54.tar.bz2
[multiple changes]
2009-08-17 Ed Schonberg <schonberg@adacore.com> * exp_ch3.adb (Build_Discriminant_Formals): If the discriminals already exist, as is the case for synchronized types, use the type of the discriminal in the parameter specification, to prevent a spurious subtype mismatch in gigi. 2009-08-17 Robert Dewar <dewar@adacore.com> * prj-env.adb: Minor reformatting * make.adb: Minor reformatting Comment updates 2009-08-17 Javier Miranda <miranda@adacore.com> * exp_ch7.adb (Wrap_Transient_Expression): Update comments. From-SVN: r150828
Diffstat (limited to 'gcc/ada/prj-env.adb')
-rw-r--r--gcc/ada/prj-env.adb3
1 files changed, 0 insertions, 3 deletions
diff --git a/gcc/ada/prj-env.adb b/gcc/ada/prj-env.adb
index c14cbd6..0ffacdb 100644
--- a/gcc/ada/prj-env.adb
+++ b/gcc/ada/prj-env.adb
@@ -222,8 +222,6 @@ package body Prj.Env is
-- Add_To_Buffer --
-------------------
- -- Wouldn't it be more consistent to use a Table for Buffer ???
-
procedure Add_To_Buffer
(S : String;
Buffer : in out String_Access;
@@ -236,7 +234,6 @@ package body Prj.Env is
declare
New_Buffer : constant String_Access :=
new String (1 .. 2 * Buffer'Last);
-
begin
New_Buffer (1 .. Buffer_Last) := Buffer (1 .. Buffer_Last);
Free (Buffer);