From 1f6821b4dcdcc3bf95f6aa4551cc755e113162be Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Wed, 15 Apr 2009 12:46:56 +0200 Subject: [multiple changes] 2009-04-15 Robert Dewar * frontend.adb (Frontend): Set proper default for Warn_On_Non_Local_Exception. * opt.ads (Exception_Handler_Encountered): New flag (No_Warn_On_Non_Local_Exception): New flag * par-ch11.adb (P_Exception_Handler): Set Exception_Handler_Encountered * sem_warn.adb (Set_Warning_Switch): Set No_Warn_On_Non_Local_Exception (Set_Dot_Warning_Switch): Set No_Warn_On_Non_Local_Exception 2009-04-15 Cyrille Comar * s-tassta.adb, a-exextr.adb, a-elchha.adb (Ada.Exception.Last_Chance_Handler): Do not print unhandled exception message when exception traces are active since it would generate redundant information. (Exception_Traces.Notify_Exception): put message output by a critical section to avoid unsynchronized output. (Trace_Unhandled_Exception_In_Task): put message output by a critical section to avoid unsynchronized output. 2009-04-15 Emmanuel Briot * g-comlin.adb, prj-tree.adb, prj-tree.ads, prj.adb, prj.ads (Free): New subprogram. From-SVN: r146100 --- gcc/ada/g-comlin.adb | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gcc/ada/g-comlin.adb') diff --git a/gcc/ada/g-comlin.adb b/gcc/ada/g-comlin.adb index 307f890..9564ff2d 100644 --- a/gcc/ada/g-comlin.adb +++ b/gcc/ada/g-comlin.adb @@ -2449,6 +2449,8 @@ package body GNAT.Command_Line is Free (Config.Aliases); Free (Config.Expansions); Free (Config.Prefixes); + Free (Config.Sections); + Free (Config.Switches); Unchecked_Free (Config); end if; end Free; -- cgit v1.1