I got new error with new fpc trunk r24896. Only happens 64bit cross compiling and 32bit compiler works ok. It maybe trouble on 64bit compiler, I guess.
Anyone have solve this problem?
Compiling graphmath.pp
graphmath.pp(743,65) Fatal: Internal error 200310121
TExternalToolList.Run Exception: C:\development\lazarus\lcl\graphmath.pp(743,65)
Fatal: Internal error 200310121
ERROR: tool reported error
function EllipseRadialLength(Rect : TRect; EccentricAngle : Extended) : Longint;
var
a, b, R : Extended;
begin
a := (Rect.Right - Rect.Left) div 2;
b := (Rect.Bottom - Rect.Top) div 2;
R := Sqr(a)*Sqr(b);
if R <> 0 then
R := Sqrt(R / ((Sqr(b)*Sqr(Cos(DegToRad(EccentricAngle/16)))) + // <--- Error
(Sqr(a)*Sqr(Sin(DegToRad(EccentricAngle/16))))));
Result := TruncToInt(R);
end;
procedure tcg.a_loadmm_loc_reg(list: TAsmList; size: tcgsize; const loc: tlocation; const reg: tregister;shuffle : pmmshuffle);
begin
case loc.loc of
LOC_MMREGISTER,LOC_CMMREGISTER:
a_loadmm_reg_reg(list,loc.size,size,loc.register,reg,shuffle);
LOC_REFERENCE,LOC_CREFERENCE:
a_loadmm_ref_reg(list,loc.size,size,loc.reference,reg,shuffle);
LOC_REGISTER,LOC_CREGISTER:
a_loadmm_intreg_reg(list,loc.size,size,loc.register,reg,shuffle);
else
internalerror(200310121);
end;
end;