Browse Source

* Sign can accept nativeint. Fix issue #39211

Michaël Van Canneyt 3 years ago
parent
commit
354bd551e5
1 changed files with 1 additions and 1 deletions
  1. 1 1
      packages/rtl/math.pas

+ 1 - 1
packages/rtl/math.pas

@@ -65,7 +65,7 @@ const
   ZeroValue = 0;
   ZeroValue = 0;
   PositiveValue = 1;
   PositiveValue = 1;
 
 
-function Sign(const AValue: Integer): TValueSign; external name 'Math.sign'; overload;
+function Sign(const AValue: NativeInt): TValueSign; external name 'Math.sign'; overload;
 function Sign(const AValue: Double): TValueSign; external name 'Math.sign'; overload;
 function Sign(const AValue: Double): TValueSign; external name 'Math.sign'; overload;
 
 
 function IsZero(const d: Double; Epsilon: Double): Boolean; overload;
 function IsZero(const d: Double; Epsilon: Double): Boolean; overload;