diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-07-15 12:03:34 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-07-15 12:03:34 +0200 |
| commit | faf387e135006d0409b250c8a8b8d2f370400156 (patch) | |
| tree | 921937b994768bcbd4f12f7d6bd8c5766b0619ba /gcc/ada/exp_ch4.adb | |
| parent | b41e33fe7f1d944ddb3d98e2c1f352fbd6f46604 (diff) | |
| download | gcc-faf387e135006d0409b250c8a8b8d2f370400156.tar.gz | |
[multiple changes]
2009-07-15 Robert Dewar <dewar@adacore.com>
* exp_ch7.adb, exp_util.adb, tbuild.adb, tbuild.ads, exp_ch4.adb,
exp_aggr.adb: Minor code reorganization (better calling sequence for
Make_Temporary).
2009-07-15 Thomas Quinot <quinot@adacore.com>
* opt.ads: Minor comment edits
From-SVN: r149672
Diffstat (limited to 'gcc/ada/exp_ch4.adb')
| -rw-r--r-- | gcc/ada/exp_ch4.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch4.adb b/gcc/ada/exp_ch4.adb index f8f2caa79b3..8343ea19b70 100644 --- a/gcc/ada/exp_ch4.adb +++ b/gcc/ada/exp_ch4.adb @@ -4043,7 +4043,7 @@ package body Exp_Ch4 is -- and replace the conditional expresion by a reference to Cnn.all ??? if Present (Then_Actions (N)) or else Present (Else_Actions (N)) then - Cnn := Make_Temporary (Loc, New_Internal_Name ('C'), N); + Cnn := Make_Temporary (Loc, 'C', N); New_If := Make_Implicit_If_Statement (N, |