mirror/gcc
2
0
Fork 0
mirror of git://gcc.gnu.org/git/gcc.git synced 2025-03-24 04:10:29 +08:00
Code Issues Packages Projects Releases Wiki Activity

i-cstrin.adb (Update): Do not append a null in form called with a String.

Browse Source 
* i-cstrin.adb (Update): Do not append a null in form called with a
	String. This avoids unintended behavior.

From-SVN: r92840
This commit is contained in:
Arnaud Charlet 2005-01-03 16:38:35 +01:00
parent 3e69e63bd1
commit 8bded5832c
1 changed files with 7 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
gcc/ada/i-cstrin.adb
View File

@ -250,7 +250,13 @@ package body Interfaces.C.Strings is
Check : Boolean := True)
is
begin
Update (Item, Offset, To_C (Str), Check);
-- Note: in RM 95, the Append_Nul => False parameter is omitted. But
-- this has the unintended consequence of truncating the string after
-- an update. As discussed in Ada 2005 AI-242, this was unintended,
-- and should be corrected. Since this is a clear error, it seems
-- appropriate to apply the correction in Ada 95 mode as well.
Update (Item, Offset, To_C (Str, Append_Nul => False), Check);
end Update;
-----------