diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 12:18:16 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2011-08-04 12:18:16 +0000 |
| commit | 2e8eadb7d7c9ca459e102ce688e4bbf530ea11e7 (patch) | |
| tree | ff41142304d473e9b7109fb745e031524cc73de5 /gcc/ada/bindgen.adb | |
| parent | 30ff3030a38f71250119a35ca85e15eda8808f47 (diff) | |
| download | gcc-2e8eadb7d7c9ca459e102ce688e4bbf530ea11e7.tar.gz | |
2011-08-04 Arnaud Charlet <charlet@adacore.com>
* make.adb (Do_Codepeer_Globalize_Step): Removed. Use CodePeer_Mode
instead.
(CodePeer_Mode_String): New.
(Linking_Phase, Binding_Phase): Call gnatlink with -P switch in
CodePeer mode.
(Scan_Make_Arg): Do not disable binding/linking phase in CodePeer mode.
* bindgen.adb (Gen_Elab_Calls_Ada): Ignore subprograms in CodePeer
mode, since no useful elaboration subprogram is needed by CodePeer.
* gnatlink.adb (Gnatlink): Add support for -P switch (CodePeer mode).
In this mode, compile binder file with -gnatC and do stop after this
step.
2011-08-04 Vincent Celier <celier@adacore.com>
* exp_ch7.adb: Minor comment fix.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177366 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/bindgen.adb')
| -rw-r--r-- | gcc/ada/bindgen.adb | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/gcc/ada/bindgen.adb b/gcc/ada/bindgen.adb index aee3bddcd2c..0da8a3a41ad 100644 --- a/gcc/ada/bindgen.adb +++ b/gcc/ada/bindgen.adb @@ -1423,7 +1423,10 @@ package body Bindgen is -- The uname_E increment is skipped if this is a separate spec, -- since it will be done when we process the body. - else + -- Ignore subprograms in CodePeer mode, since no useful + -- elaboration subprogram is needed by CodePeer. + + elsif U.Unit_Kind /= 's' or else not CodePeer_Mode then if Force_Checking_Of_Elaboration_Flags or Interface_Library_Unit or not Bind_Main_Program |