From c9f95e4c252a3e5528c4da53b183c78b66258566 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 10 Oct 2014 16:42:22 +0200 Subject: [multiple changes] 2014-10-10 Ed Schonberg * sem_ch13.adb (Analyze_Aspect_Specifications, Library_Unit_Aspects): Aspect specification is legal on a local instantiation of a library-level generic unit. 2014-10-10 Gary Dismukes * gnat1drv.adb (Adjust_Global_Switches): Set Front_End_Inlining if inlining has been enabled via -gnatn and the target is not GCC. 2014-10-10 Ed Schonberg * freeze.adb (Freeze_Entity): Freezing a subprogram does not always freeze its profile. In particular, an attribute reference that takes the access type does not freeze the types of the formals. From-SVN: r216090 --- gcc/ada/gnat1drv.adb | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'gcc/ada/gnat1drv.adb') diff --git a/gcc/ada/gnat1drv.adb b/gcc/ada/gnat1drv.adb index 50f4bef..545d143 100644 --- a/gcc/ada/gnat1drv.adb +++ b/gcc/ada/gnat1drv.adb @@ -583,6 +583,12 @@ procedure Gnat1drv is end if; end if; + -- Treat -gnatn as equivalent to -gnatN for non-GCC targets + + if Inline_Active and then not Front_End_Inlining then + Front_End_Inlining := VM_Target /= No_VM or else AAMP_On_Target; + end if; + -- Set back end inlining indication Back_End_Inlining := -- cgit v1.1