mattias преди 7 години
родител
ревизия
fe82a58da2
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      packages/rtl/math.pas

+ 1 - 1
packages/rtl/math.pas

@@ -276,7 +276,7 @@ end;
 
 function IsInfinite(const d: JSValue): Boolean; assembler;
 asm
-  return (d==Infinite) || (d==-Infinite);
+  return (d==Infinity) || (d==-Infinity);
 end;
 
 function SameValue(const A, B: Double; Epsilon: Double): Boolean;