diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-10-04 14:57:56 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-10-04 14:57:56 +0000 |
| commit | cb75489d5040b84fb6651a485a2be415515f651a (patch) | |
| tree | 5967ad580b6b278f38c7fea4a2f49131b82ffe2e /gcc/ada/sem_ch6.adb | |
| parent | 01e7e23d70b079e0c4e269c879414cc813298c74 (diff) | |
| download | gcc-cb75489d5040b84fb6651a485a2be415515f651a.tar.gz | |
2004-10-04 Ed Schonberg <schonberg@gnat.com>
* sem_ch6.adb (Analyze_Subprogram_Body): Do not treat Inline as
Inline_Always when in Configurable_Run_Time mode.
* sem_prag.adb (Process_Convention): If entity is an inherited
subprogram, apply convention to parent subprogram if in same scope.
(Analyze_Pragma, case Inline): Do not treat Inline as Inline_Always
when in Configurable_Run_Time mode.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88498 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch6.adb')
| -rw-r--r-- | gcc/ada/sem_ch6.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/sem_ch6.adb b/gcc/ada/sem_ch6.adb index 9ed4bc4d54a..d5fc22632bf 100644 --- a/gcc/ada/sem_ch6.adb +++ b/gcc/ada/sem_ch6.adb @@ -1175,8 +1175,7 @@ package body Sem_Ch6 is Check_Following_Pragma; if Is_Always_Inlined (Spec_Id) - or else (Has_Pragma_Inline (Spec_Id) - and then (Front_End_Inlining or else Configurable_Run_Time_Mode)) + or else (Has_Pragma_Inline (Spec_Id) and then Front_End_Inlining) then Build_Body_To_Inline (N, Spec_Id); end if; |