aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/a-coinve.adb
diff options
context:
space:
mode:
authorRobert Dewar <dewar@adacore.com>2011-12-02 14:38:54 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2011-12-02 15:38:54 +0100
commit35fae080e6722415f3308bb3375236f657022b61 (patch)
tree1cdaf7acba063fc30006b1aa7fab06c89b66e731 /gcc/ada/a-coinve.adb
parente47e21c129bdb0cf5066944faf503f761b6023e0 (diff)
downloadgcc-35fae080e6722415f3308bb3375236f657022b61.zip
gcc-35fae080e6722415f3308bb3375236f657022b61.tar.gz
gcc-35fae080e6722415f3308bb3375236f657022b61.tar.bz2
a-coinve.adb, [...]: Minor reformatting.
2011-12-02 Robert Dewar <dewar@adacore.com> * a-coinve.adb, a-coorma.adb, freeze.adb, a-coorse.adb, a-comutr.adb, a-coormu.adb, a-convec.adb: Minor reformatting. From-SVN: r181913
Diffstat (limited to 'gcc/ada/a-coinve.adb')
-rw-r--r--gcc/ada/a-coinve.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/a-coinve.adb b/gcc/ada/a-coinve.adb
index 02a3c53..dca166f 100644
--- a/gcc/ada/a-coinve.adb
+++ b/gcc/ada/a-coinve.adb
@@ -29,6 +29,7 @@
with Ada.Containers.Generic_Array_Sort;
with Ada.Unchecked_Deallocation;
+
with System; use type System.Address;
package body Ada.Containers.Indefinite_Vectors is
@@ -1112,7 +1113,6 @@ package body Ada.Containers.Indefinite_Vectors is
if Object.Container /= null then
declare
B : Natural renames Object.Container.all.Busy;
-
begin
B := B - 1;
end;