diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-24 11:11:43 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-06-24 11:11:43 +0200 |
| commit | dd3e1ff52932c9093fa88a9dac4fd586536c4279 (patch) | |
| tree | c0fd9d73501cb1aff6eb977d385a6853104cabf1 /gcc/ada/layout.adb | |
| parent | 0386aad11f240d525a625849e9411a25c7ef07f6 (diff) | |
| download | gcc-dd3e1ff52932c9093fa88a9dac4fd586536c4279.zip gcc-dd3e1ff52932c9093fa88a9dac4fd586536c4279.tar.gz gcc-dd3e1ff52932c9093fa88a9dac4fd586536c4279.tar.bz2 | |
[multiple changes]
2009-06-24 Robert Dewar <dewar@adacore.com>
* exp_ch6.adb: Minor reformatting
* layout.adb: Minor reformatting
* make.adb: Minor reformatting
2009-06-24 Thomas Quinot <quinot@adacore.com>
* sem_ch10.adb: Minor code reorganization.
From-SVN: r148898
Diffstat (limited to 'gcc/ada/layout.adb')
| -rw-r--r-- | gcc/ada/layout.adb | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/gcc/ada/layout.adb b/gcc/ada/layout.adb index 6cce7b9..69772d6 100644 --- a/gcc/ada/layout.adb +++ b/gcc/ada/layout.adb @@ -3055,8 +3055,9 @@ package body Layout is -- the type, or the maximum allowed alignment. declare - S : constant Int := UI_To_Int (Esize (E)) / SSU; - Max_Alignment, A : Nat; + S : constant Int := UI_To_Int (Esize (E)) / SSU; + A : Nat; + Max_Alignment : Nat; begin -- If the default alignment of "double" floating-point types is |