浏览代码

* Sign can accept nativeint. Fix issue #39211

Michaël Van Canneyt 3 年之前
父节点
当前提交
354bd551e5
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      packages/rtl/math.pas

+ 1 - 1
packages/rtl/math.pas

@@ -65,7 +65,7 @@ const
   ZeroValue = 0;
   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 IsZero(const d: Double; Epsilon: Double): Boolean; overload;