From: Arnaud Charlet Date: Thu, 7 Jul 2016 13:02:31 +0000 (+0200) Subject: [multiple changes] X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=7dccd19430283ffe5aac0bf55e42f84f5edcddcb;p=gcc.git [multiple changes] 2016-07-07 Thomas Quinot * g-socket.ads: Document performance consideration for stream wrapper. 2016-07-07 Arnaud Charlet * osint-c.ads (Set_File_Name): Clarify spec. From-SVN: r238110 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 48afee0571c..828932c257b 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,12 @@ +2016-07-07 Thomas Quinot + + * g-socket.ads: Document performance consideration for stream + wrapper. + +2016-07-07 Arnaud Charlet + + * osint-c.ads (Set_File_Name): Clarify spec. + 2016-07-07 Eric Botcazou * freeze.adb: Reenable code. diff --git a/gcc/ada/g-socket.ads b/gcc/ada/g-socket.ads index 5de70d810dc..9957e2ca49b 100644 --- a/gcc/ada/g-socket.ads +++ b/gcc/ada/g-socket.ads @@ -1005,7 +1005,11 @@ package GNAT.Sockets is -- Same interface as Ada.Streams.Stream_IO function Stream (Socket : Socket_Type) return Stream_Access; - -- Create a stream associated with an already connected stream-based socket + -- Create a stream associated with a connected stream-based socket. + -- Note: keep in mind that the default stream attributes for composite + -- types perform separate Read/Write operations for each component, + -- recursively. If performance is an issue, you may want to consider + -- introducing a buffering stage. function Stream (Socket : Socket_Type; diff --git a/gcc/ada/osint-c.ads b/gcc/ada/osint-c.ads index 54ffb01f601..e7379175e9c 100644 --- a/gcc/ada/osint-c.ads +++ b/gcc/ada/osint-c.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 2001-2015, Free Software Foundation, Inc. -- +-- Copyright (C) 2001-2016, 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- -- @@ -111,7 +111,8 @@ package Osint.C is procedure Set_File_Name (Ext : String); -- Sets a default file name from the main compiler source name. Ext is the -- extension, e.g. "ali" for a library information file. The name is in - -- Name_Buffer (with length in Name_Len) on return. + -- Name_Buffer (with length in Name_Len) on return, with + -- Name_Buffer (Name_Len) always set to ASCII.NUL. -------------------------------- -- Library Information Output --