diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:42:36 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:42:36 +0000 |
commit | f49f70c601bb9894863330a4b61c1490223c81bc (patch) | |
tree | 298947097aca76e99bed3f60f7d6ffc1ab05de20 /gcc/ada/sem_ch10.ads | |
parent | 4d76555395832588a2c099d38986246eda637c51 (diff) | |
download | gcc-f49f70c601bb9894863330a4b61c1490223c81bc.tar.gz |
2007-04-20 Javier Miranda <miranda@adacore.com>
Ed Schonberg <schonberg@adacore.com>
Robert Dewar <dewar@adacore.com>
* sem_ch10.ads, sem_ch10.adb (Analyze_Compilation_Unit): Disable check
on obsolescent withed unit in case of limited-withed units.
(Analyze_Compilation_Unit): Add guard to code that removed an
instantiation from visibility, to prevent compiler aborts when
instantiation is abandoned early on.
(Install_Limited_Withed_Unit): Recognize a limited-with clause on the
current unit being analyzed, and Distinguish local incomplete types
from limited views of types declared elsewhere.
(Build_Limited_Views.Decorate_Tagged_Type): Add documentation
to state that the class-wide entity is shared by the limited-view
and the full-view.
(Analyze_With_Clause): Improve placement of flag for case of
unimplemented unit.
(Analyze_With_Clause): Recognize use of GNAT.Exception_Traces in a
manner similar to GNAT.Current_Exception. This is a violation of
restriction (No_Exception_Propagation), and also inhibits the
optimization of local raise to goto.
(Analyze_With_Clause): Check for Most_Recent_Exception being with'ed,
and if so set Most_Recent_Exception_Used flag in Opt, and also check
for violation of restriction No_Exception_Propagation.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125447 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch10.ads')
-rw-r--r-- | gcc/ada/sem_ch10.ads | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch10.ads b/gcc/ada/sem_ch10.ads index 563423e4673..e59189196b7 100644 --- a/gcc/ada/sem_ch10.ads +++ b/gcc/ada/sem_ch10.ads @@ -28,7 +28,6 @@ with Types; use Types; package Sem_Ch10 is procedure Analyze_Compilation_Unit (N : Node_Id); procedure Analyze_With_Clause (N : Node_Id); - procedure Analyze_With_Type_Clause (N : Node_Id); procedure Analyze_Subprogram_Body_Stub (N : Node_Id); procedure Analyze_Package_Body_Stub (N : Node_Id); procedure Analyze_Task_Body_Stub (N : Node_Id); |