paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-07 14:27:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Ensure null-terminated strings. Patch by modersohn, fixes issue #40499

Browse Source
This commit is contained in:
Michaël Van Canneyt 2023-11-03 17:01:03 +01:00
parent 82bc91e6cf
commit 25c75b1784
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
rtl/unix/cwstring.pp
View File

@ -285,7 +285,8 @@ begin
{$endif}
toencoding:=iconvname;
if not assigned(iconvctl) then
toencoding:=toencoding+TransLitName;
toencoding:=toencoding+TransLitName+#0;
iconvname:=iconvname+#0;
iconv_wide2ansi:=iconv_open(PAnsiChar(@toencoding[1]),unicode_encoding2);
iconv_ansi2wide:=iconv_open(unicode_encoding2,PAnsiChar(@iconvname[1]));
if assigned(iconvctl) and