diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-10-14 15:40:56 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2013-10-14 15:40:56 +0200 |
| commit | 63bb4268049d7a6a1944c3a15b374bca8ccf2b45 (patch) | |
| tree | 938b63e5a4cb6035695a3246f0d1fae3bb5cf88d /gcc/ada/exp_util.ads | |
| parent | e74d643a35af630dde8a5fd9582b1c391fd022c4 (diff) | |
| download | gcc-63bb4268049d7a6a1944c3a15b374bca8ccf2b45.zip gcc-63bb4268049d7a6a1944c3a15b374bca8ccf2b45.tar.gz gcc-63bb4268049d7a6a1944c3a15b374bca8ccf2b45.tar.bz2 | |
[multiple changes]
2013-10-14 Arnaud Charlet <charlet@adacore.com>
* exp_ch11.adb: Fix typo.
2013-10-14 Thomas Quinot <quinot@adacore.com>
* exp_util.ads: Minor reformatting.
2013-10-14 Ed Schonberg <schonberg@adacore.com>
* sem_ch3.adb (Build_Derived_Record_Type): Reject full views
with no explicit discriminant constraints, when the parents of
the partial view and the full view are constrained subtypes with
different constraints.
2013-10-14 Robert Dewar <dewar@adacore.com>
* freeze.adb (Freeze_Array_Type): New procedure, abstracts out
this code from Freeze.
(Freeze_Array_Type): Detect pragma Pack overriding foreign convention
(Freeze_Record_Type): Ditto.
From-SVN: r203553
Diffstat (limited to 'gcc/ada/exp_util.ads')
| -rw-r--r-- | gcc/ada/exp_util.ads | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads index 7ca7c01..60a2132 100644 --- a/gcc/ada/exp_util.ads +++ b/gcc/ada/exp_util.ads @@ -359,9 +359,9 @@ package Exp_Util is -- by the compiler and used by GDB. procedure Evaluate_Name (Nam : Node_Id); - -- Remove the all side effects from a name which appears as part of an - -- object renaming declaration. More comments are needed here that explain - -- how this differs from Force_Evaluation and Remove_Side_Effects ??? + -- Remove all side effects from a name which appears as part of an object + -- renaming declaration. More comments are needed here that explain how + -- this differs from Force_Evaluation and Remove_Side_Effects ??? procedure Evolve_And_Then (Cond : in out Node_Id; Cond1 : Node_Id); -- Rewrites Cond with the expression: Cond and then Cond1. If Cond is |