paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-08 04:37:23 +01:00
Code Issues Packages Projects Releases Wiki Activity

Qt6: Proper cast of result for -Sy.

Browse Source
This commit is contained in:
Željan Rikalo 2024-02-05 17:07:09 +01:00
parent d0b70cc7d4
commit 67868afe81
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lcl/interfaces/qt6/qt62.pas
View File

@ -15716,7 +15716,7 @@ end;
// QReal Array Access from c-code
function GetQRealArrayAddr(var PArr : TQRealArray): PPtrInt; cdecl; export;
begin
Result := @PArr[0];
Result := PPtrInt(@PArr[0]);
end;
function GetQRealArrayLength(var PArr: TQRealArray): Integer; cdecl; export;