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

* hopefully the final fix to #40288

Browse Source 
(cherry picked from commit 0af25e1644)
This commit is contained in:
marcoonthegit 2023-08-31 11:56:06 +02:00
parent 6f9bc75648
commit 685a2e3477
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
packages/fcl-image/src/freetype.pp
View File

@ -547,8 +547,8 @@ begin
with Transformation do
begin
sincos(Angle,asin,acos);
yx:=round(asin)*$10000;
xx:=round(acos)*$10000;
yx:=round(asin*$10000);
xx:=round(acos*$10000);
xy:=-yx; yy:=xx;
end;
end;