* restrict.adb (Disallow in No_Run_Time_Mode): Properly specialize
authorbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 12 Oct 2001 00:21:40 +0000 (00:21 +0000)
committerbosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 12 Oct 2001 00:21:40 +0000 (00:21 +0000)
commita7b4d0777f64ffceedfc656aab24815db3406891
tree0f89902e80ebe7075531f1ea0945930034fb97aa
parent59c93cd996e0ac582348d0fd3620e01c70f12326
* restrict.adb (Disallow in No_Run_Time_Mode): Properly specialize
the error message for high integrity mode.

* rtsfind.adb (RTE): Give message if we try to find an entity that
is not available in high integrity mode.

* rtsfind.ads:
(OK_To_Use_In_HIE_Mode): New array.
(RTE): May return Empty in high integrity mode.

* rtsfind.ads (OK_To_Use_In_No_Run_Time_Mode): New name for
OK_To_Use_In_HIE_Mode, now includes System_FAT_xxx.

* sem_ch6.adb (Analyze_Subprogram_Body): Kill body in predefined
unit if not inlined always and in no runtime mode. Fixes problem
caused by new Rtsfind changes.

* sem_ch6.adb (Analyze_Subrogram_Body): Do not Check_References if
body is deleted.

* rtsfind.adb (RTE): Make sure we do not try to load unit after
giving message for entity not available in high integrity mode.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46214 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/ada/ChangeLog
gcc/ada/restrict.adb
gcc/ada/rtsfind.adb
gcc/ada/rtsfind.ads
gcc/ada/sem_ch6.adb