diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-08-17 10:00:43 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-08-17 10:00:43 +0000 |
| commit | 447e605f4566b27ff6da22c7dca9671073f49508 (patch) | |
| tree | 707c00de0f57a2f536e10fba49d312ef5b42d055 /gcc/ada/tbuild.adb | |
| parent | 135f9e61bacfd8c0adae3ca32dab052df2199460 (diff) | |
| download | gcc-447e605f4566b27ff6da22c7dca9671073f49508.tar.gz | |
2009-08-17 Robert Dewar <dewar@adacore.com>
* tbuild.adb: Minor reformatting
2009-08-17 Thomas Quinot <quinot@adacore.com>
* exp_ch4.adb (Exp_Ch4.Expand_N_Slice.Make_Temporary): Rename to
Make_Temporary_For_Slice to avoid confusion with Tbuild.Make_Temporary.
Use Tbuild.Make_Temporary to create entity for the temporary.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@150832 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/tbuild.adb')
| -rw-r--r-- | gcc/ada/tbuild.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/tbuild.adb b/gcc/ada/tbuild.adb index 52f6fbf17a1..7273fde6703 100644 --- a/gcc/ada/tbuild.adb +++ b/gcc/ada/tbuild.adb @@ -446,7 +446,8 @@ package body Tbuild is Related_Node : Node_Id := Empty) return Node_Id is Temp : constant Node_Id := - Make_Defining_Identifier (Loc, Chars => New_Internal_Name (Id)); + Make_Defining_Identifier (Loc, + Chars => New_Internal_Name (Id)); begin Set_Related_Expression (Temp, Related_Node); return Temp; |