diff options
author | Hristian Kirtchev <kirtchev@adacore.com> | 2007-09-26 12:41:24 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2007-09-26 12:41:24 +0200 |
commit | 954c111a1a1fa7dafb94df4925d320f0f8bbac7a (patch) | |
tree | a45cee9b77f63bb77345528eb520b2ed1e2b0337 /gcc/ada/s-tarest.adb | |
parent | ba6dccf8f9334926354056be32b55a09c7ead740 (diff) | |
download | gcc-954c111a1a1fa7dafb94df4925d320f0f8bbac7a.tar.gz |
sem_ch8.adb (Analyze_Use_Type): Code cleanup.
2007-09-26 Hristian Kirtchev <kirtchev@adacore.com>
* sem_ch8.adb (Analyze_Use_Type): Code cleanup.
(Applicable_Use): Emit a warning when a package tries to use itself.
(Use_One_Type): Add variable Is_Known_Used. Emit a warning when a type
is already in use or the package where it is declared is in use or is
declared in the current package.
(Spec_Reloaded_For_Body): New subsidiary routine for Use_One_Type.
* a-tasatt.adb, s-osprim-vxworks.adb, g-socthi-mingw.adb,
s-intman-vms.adb, g-socket.adb, g-thread.adb, s-tarest.adb,
s-tassta.adb, s-tporft.adb: Remove redundant 'use type' clause.
From-SVN: r128779
Diffstat (limited to 'gcc/ada/s-tarest.adb')
-rw-r--r-- | gcc/ada/s-tarest.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/s-tarest.adb b/gcc/ada/s-tarest.adb index cfe07583539..509b0d030ef 100644 --- a/gcc/ada/s-tarest.adb +++ b/gcc/ada/s-tarest.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1999-2006, Free Software Foundation, Inc. -- +-- Copyright (C) 1999-2007, Free Software Foundation, Inc. -- -- -- -- GNARL is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -195,7 +195,6 @@ package body System.Tasking.Restricted.Stages is -- -- DO NOT delete ID. As noted, it is needed on some targets. - use type System.Parameters.Size_Type; use type SSE.Storage_Offset; Secondary_Stack : aliased SSE.Storage_Array |