diff --git a/packages/fcl-json/tests/testcomps.pas b/packages/fcl-json/tests/testcomps.pas index 7398cb9014..de127c74ae 100644 --- a/packages/fcl-json/tests/testcomps.pas +++ b/packages/fcl-json/tests/testcomps.pas @@ -659,7 +659,11 @@ end; constructor TCompComponent.Create(AOwner: TComponent); begin inherited; +{$if defined(FPC_COMP_IS_INT64)} + F:=Round(4.56); +{$else defined(FPC_COMP_IS_INT64)} F:=4.56; +{$endif defined(FPC_COMP_IS_INT64)} end; { TCurrencyComponent }