diff options
author | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-30 23:12:48 +0000 |
---|---|---|
committer | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-30 23:12:48 +0000 |
commit | 86f5f2af0a68aed9294e9262267e296a0c55096d (patch) | |
tree | d522b79485e5a4d2132d86c6f51a4d207b03b8c1 /gcc/ada/gnatbind.adb | |
parent | 306c12eb36be59171973302266166119f68532ca (diff) | |
download | gcc-86f5f2af0a68aed9294e9262267e296a0c55096d.tar.gz |
* bindusg.adb: Undocument -f switch.
* gnatcmd.adb: Remove /FULL_ELABORATION.
* opt.ads (Force_RM_Elaboration_Order): Document that this is
obsolescent.
* gnatbind.adb: Output new warning for use of obsolescent -f switch.
* gnatbind.adb: Minor update of warning msg.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46657 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gnatbind.adb')
-rw-r--r-- | gcc/ada/gnatbind.adb | 16 |
1 files changed, 9 insertions, 7 deletions
diff --git a/gcc/ada/gnatbind.adb b/gcc/ada/gnatbind.adb index 61f4a01f476..49890a046da 100644 --- a/gcc/ada/gnatbind.adb +++ b/gcc/ada/gnatbind.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- $Revision: 1.68 $ +-- $Revision$ -- -- -- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- -- -- @@ -399,13 +399,15 @@ begin Read_ALI (Index); end loop; - -- Warn if -f switch used with static model + -- Warn if -f switch used - if Force_RM_Elaboration_Order - and Static_Elaboration_Model_Used - then - Error_Msg ("?static elaboration model used, but -f specified"); - Error_Msg ("?may result in missing run-time elaboration checks"); + if Force_RM_Elaboration_Order then + Error_Msg + ("?-f is obsolescent and should not be used"); + Error_Msg + ("?may result in missing run-time elaboration checks"); + Error_Msg + ("?use -gnatE, pragma Suppress (Elaboration_Checks) instead"); end if; -- Quit if some file needs compiling |