Преглед на файлове

* GetExceptionMask returned inverted result for exInvalidOp

git-svn-id: trunk@3148 -
Jonas Maebe преди 19 години
родител
ревизия
35fe1b27cd
променени са 1 файла, в които са добавени 1 реда и са изтрити 1 реда
  1. 1 1
      rtl/powerpc/mathu.inc

+ 1 - 1
rtl/powerpc/mathu.inc

@@ -81,7 +81,7 @@ end;
 function GetExceptionMask: TFPUExceptionMask;
 function GetExceptionMask: TFPUExceptionMask;
 begin
 begin
   result := [];
   result := [];
-  if ((getFPSCR and InvalidOperationMask) <> 0) then 
+  if ((getFPSCR and InvalidOperationMask) = 0) then 
     result := result + [exInvalidOp];
     result := result + [exInvalidOp];
   if ((getFPSCR and OverflowMask) = 0) then 
   if ((getFPSCR and OverflowMask) = 0) then 
     result := result + [exOverflow];
     result := result + [exOverflow];