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

* GetLoadErrorStr (currently) returns a ShortString, so avoid a useless conversion to AnsiString

Browse Source 
git-svn-id: trunk@45329 -
This commit is contained in:
svenbarth 2020-05-10 20:46:04 +00:00
parent 2a2ec77b10
commit 3c79a8dd81
1 changed files with 1 additions and 1 deletions

2
rtl/win/sysdl.inc
View File

@ -59,7 +59,7 @@ begin
MakeLangId(LANG_NEUTRAL, SUBLANG_DEFAULT),
@temp[1], 255,nil);
SetLength(temp,c);
Result:=AnsiString(temp);
Result:=String(temp);
end;
const