From 241bea26410d0aec26d5f98d032061d9fa455a74 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Mon, 17 Aug 2009 12:33:58 +0200 Subject: [multiple changes] 2009-08-17 Vasiliy Fofanov * a-calend-vms.adb: Fix typo. 2009-08-17 Tristan Gingold * s-taprop-posix.adb: Round up the stack size to avoid failure on Darwin. 2009-08-17 Gary Dismukes * sem_cat.adb (Validate_Static_Object_Name): Update comment. 2009-08-17 Vincent Celier * make.adb (Arguments_Collected): Unneeded, removed (Change_To_Object_Directory): Use Project directly. Add pragma Assert to ensure caller does not pass in No_Project. (Compile): Add new parameter Project. Let procedure Collect_Arguments_And_Compile provide the proper value. * switch-c.adb: Add documentation for -gnatea and -gnatez 2009-08-17 Ben Brosgol * gnat_ugn.texi: Changed name of package in SAL example, to avoid clash with Ada 2005 reserved word (interface). From-SVN: r150838 --- gcc/ada/switch-c.adb | 15 +++++++++++++-- 1 file changed, 13 insertions(+), 2 deletions(-) (limited to 'gcc/ada/switch-c.adb') diff --git a/gcc/ada/switch-c.adb b/gcc/ada/switch-c.adb index 6825f4e..1ecae61 100644 --- a/gcc/ada/switch-c.adb +++ b/gcc/ada/switch-c.adb @@ -309,6 +309,11 @@ package body Switch.C is case Switch_Chars (Ptr) is + -- -gnatea (initial delimiter of explicit switches) + -- All switches that come before -gnatea have been added by + -- the GCC driver and are not stored in the ALI file. + -- See also -gnatez below. + when 'a' => Store_Switch := False; Enable_Switch_Storing; @@ -462,14 +467,20 @@ package body Switch.C is Ptr := Max + 1; - -- -gnatez ??? + -- -gnatez (final delimiter of explicit switches) + -- All switches that come after -gnatez have been added by + -- the GCC driver and are not stored in the ALI file. + -- See also -gnatea above. when 'z' => Store_Switch := False; Disable_Switch_Storing; Ptr := Ptr + 1; - -- -gnateS (Store SCO information) + -- -gnateS (generate SCO information) + -- Include Source Coverage Obligation information in ALI + -- files for the benefit of source coverage analysis tools + -- (xcov). when 'S' => Generate_SCO := True; -- cgit v1.1