summaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>2001-10-26 01:12:44 +0000
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>2001-10-26 01:12:44 +0000
commit0fdf5b8e730d9daf56d4f4e0ce274a49523ea913 (patch)
tree23659a5d664ce116e5370a8fe2b85c8183685970 /gcc
parent6c17421b9705e186d187368247e3aea7175fe52c (diff)
downloadgcc-0fdf5b8e730d9daf56d4f4e0ce274a49523ea913.tar.gz
* sem_elab.adb (Check_A_Call): refine message when call is in an
instance but callee is not declared in the generic unit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46513 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/ChangeLog5
-rw-r--r--gcc/ada/sem_elab.adb1
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index a3bdfef7997..410f1178dfe 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,4 +1,9 @@
2001-10-25 Ed Schonberg <schonber@gnat.com>
+
+ * sem_elab.adb (Check_A_Call): refine message when call is in an
+ instance but callee is not declared in the generic unit.
+
+2001-10-25 Ed Schonberg <schonber@gnat.com>
* sem_elab.adb (Check_A_Call): check for renaming before finding the
enclosing unit, which may already be different from the calling unit.
diff --git a/gcc/ada/sem_elab.adb b/gcc/ada/sem_elab.adb
index 943161addac..53dc7f82a89 100644
--- a/gcc/ada/sem_elab.adb
+++ b/gcc/ada/sem_elab.adb
@@ -521,6 +521,7 @@ package body Sem_Elab is
if Unit_Caller /= No_Unit
and then Unit_Callee /= Unit_Caller
+ and then Unit_Callee /= No_Unit
and then not Dynamic_Elaboration_Checks
then
E_Scope := Spec_Entity (Cunit_Entity (Unit_Caller));