From 3dd9959c810d51dac8ae52ce28212bcac2afc437 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Tue, 7 Apr 2009 17:01:27 +0200 Subject: [multiple changes] 2009-04-07 Robert Dewar (Osint.Fail): Change calling sequence to have one string arg (Make.Make_Failed): Same change All callers are adjusted to use concatenation 2009-04-07 Robert Dewar * exp_ch4.adb: Fix documentation typo 2009-04-07 Robert Dewar * tbuild.ads: Minor reformatting 2009-04-07 Javier Miranda * exp_disp.adb (Make_DT): Avoid the generation of the OSD_Table when compiling under ZFP runtime. 2009-04-07 Robert Dewar * g-comlin.adb: Minor reformatting 2009-04-07 Thomas Quinot * socket.c, g-socthi-vms.adb, g-socthi-vms.ads, g-socthi-vxworks.adb, g-socthi-vxworks.ads, g-socthi-mingw.adb, g-socthi-mingw.ads, g-socthi.adb, g-socthi.ads, g-socket.adb, g-socket.ads, g-sothco.ads: Remove dynamic allocation of Fd_Set in Socket_Set_Type objects. From-SVN: r145678 --- gcc/ada/frontend.adb | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'gcc/ada/frontend.adb') diff --git a/gcc/ada/frontend.adb b/gcc/ada/frontend.adb index c01e8ef..8f16a11 100644 --- a/gcc/ada/frontend.adb +++ b/gcc/ada/frontend.adb @@ -169,8 +169,8 @@ begin if Source_Config_File = No_Source_File then Osint.Fail - ("cannot find configuration pragmas file ", - Config_File_Names (Index).all); + ("cannot find configuration pragmas file " + & Config_File_Names (Index).all); end if; Initialize_Scanner (No_Unit, Source_Config_File); -- cgit v1.1