Browse Source

* Merging revisions 165 from trunk:
------------------------------------------------------------------------
r165 | michael | 2018-10-17 09:49:17 +0200 (Wed, 17 Oct 2018) | 1 line

* Fix int not working on IE
------------------------------------------------------------------------

michael 6 years ago
parent
commit
9cf938f788
1 changed files with 2 additions and 3 deletions
  1. 2 3
      packages/rtl/system.pas

+ 2 - 3
packages/rtl/system.pas

@@ -454,10 +454,9 @@ end;
 
 
 function Int(const A: Double): double;
 function Int(const A: Double): double;
 
 
-  function FTrunc(const A: Double): double; overload; external name 'Math.trunc';
-
 begin
 begin
-  Result:=FTrunc(A);
+  // trunc contains fix for missing Math.trunc in IE
+  Result:=Trunc(A);
 end;
 end;
 
 
 function Number(S: String): Double; external name 'Number';
 function Number(S: String): Double; external name 'Number';