aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/osint-b.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2009-04-07 17:01:27 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2009-04-07 17:01:27 +0200
commit3dd9959c810d51dac8ae52ce28212bcac2afc437 (patch)
tree97de4be619b593f2d66a2fa45de2b0a01f1177c0 /gcc/ada/osint-b.adb
parentdcd8728b8e5ad2b9920f184e028850553b243ba4 (diff)
downloadgcc-3dd9959c810d51dac8ae52ce28212bcac2afc437.zip
gcc-3dd9959c810d51dac8ae52ce28212bcac2afc437.tar.gz
gcc-3dd9959c810d51dac8ae52ce28212bcac2afc437.tar.bz2
[multiple changes]
2009-04-07 Robert Dewar <dewar@adacore.com> (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 <dewar@adacore.com> * exp_ch4.adb: Fix documentation typo 2009-04-07 Robert Dewar <dewar@adacore.com> * tbuild.ads: Minor reformatting 2009-04-07 Javier Miranda <miranda@adacore.com> * exp_disp.adb (Make_DT): Avoid the generation of the OSD_Table when compiling under ZFP runtime. 2009-04-07 Robert Dewar <dewar@adacore.com> * g-comlin.adb: Minor reformatting 2009-04-07 Thomas Quinot <quinot@adacore.com> * 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
Diffstat (limited to 'gcc/ada/osint-b.adb')
-rw-r--r--gcc/ada/osint-b.adb6
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/osint-b.adb b/gcc/ada/osint-b.adb
index 80009a5..b66cebf 100644
--- a/gcc/ada/osint-b.adb
+++ b/gcc/ada/osint-b.adb
@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
--- Copyright (C) 2001-2007, Free Software Foundation, Inc. --
+-- Copyright (C) 2001-2008, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -39,8 +39,8 @@ package body Osint.B is
if not Status then
Fail
- ("error while closing generated file ",
- Get_Name_String (Output_File_Name));
+ ("error while closing generated file "
+ & Get_Name_String (Output_File_Name));
end if;
end Close_Binder_Output;