summaryrefslogtreecommitdiff
path: root/gcc/ada/inline.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-03 09:56:17 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2011-08-03 09:56:17 +0000
commitea301f8de60fc76d77f3a8808f4a461cd2854af2 (patch)
treee29cb543e455987bc4968bd9f8bc0c196a53d0f2 /gcc/ada/inline.adb
parent4278abe43558660ecf4a08ac194843f1dfc348df (diff)
downloadgcc-ea301f8de60fc76d77f3a8808f4a461cd2854af2.tar.gz
2011-08-03 Eric Botcazou <ebotcazou@adacore.com>
* inline.adb: Revert previous change. 2011-08-03 Thomas Quinot <quinot@adacore.com> * sem_cat.adb (Validate_RCI_Subprogram_Declaration): Reject a remote subprogram with a limited formal that does not support external streaming. 2011-08-03 Yannick Moy <moy@adacore.com> * get_alfa.adb (Get_ALFA): add missing Skip_Spaces at start of continuation line * lib-xref-alfa.adb (Add_ALFA_File): split removal of scopes that are not from current unit in two phases, because it is not possible to change the table while iterating over its content. * put_alfa.adb (Put_ALFA): reset current file/scope at each new entity 2011-08-03 Sergey Rybin <rybin@adacore.com> * vms_data.ads: Add qualifier for gnatmetric --no-static-loop option * gnat_ugn.texi: Update description of complexity metrics (gnatmetric) git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@177255 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/inline.adb')
-rw-r--r--gcc/ada/inline.adb6
1 files changed, 0 insertions, 6 deletions
diff --git a/gcc/ada/inline.adb b/gcc/ada/inline.adb
index 0d184dd45b2..d85e0866a48 100644
--- a/gcc/ada/inline.adb
+++ b/gcc/ada/inline.adb
@@ -349,12 +349,6 @@ package body Inline is
Set_Is_Inlined (Pack);
Inlined_Bodies.Increment_Last;
Inlined_Bodies.Table (Inlined_Bodies.Last) := Pack;
-
- -- an initialization procedure should be inlined, but it does
- -- not require the body of the package.
-
- elsif Is_Init_Proc (E) then
- Set_Is_Inlined (Pack);
end if;
end if;
end;