From 12e313d41b3d43d18abd05b2a4c7916b852cdf2c Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=C5=BDeljan=20Rikalo?= Date: Sat, 26 Aug 2023 10:35:06 +0200 Subject: [PATCH] Qt5: Fixed compiling qt56.pas with -Sy option. --- lcl/interfaces/qt5/qt56.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lcl/interfaces/qt5/qt56.pas b/lcl/interfaces/qt5/qt56.pas index 37ed420b78..b59990b47c 100644 --- a/lcl/interfaces/qt5/qt56.pas +++ b/lcl/interfaces/qt5/qt56.pas @@ -15836,7 +15836,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;