소스 검색

Reset FPU state in SignalToRunError for SIGFPE, fixes tw12214 failure

git-svn-id: trunk@29552 -
pierre 10 년 전
부모
커밋
817555cd6e
1개의 변경된 파일9개의 추가작업 그리고 1개의 파일을 삭제
  1. 9 1
      rtl/solaris/i386/sighnd.inc

+ 9 - 1
rtl/solaris/i386/sighnd.inc

@@ -61,7 +61,15 @@ begin
               res:=207;
          end;
          with sigcontext^.uc_mcontext.fpregs.fpchip_state do
-           status:=status and not FPU_ExceptionMask;
+           begin
+             status:=status and not FPU_ExceptionMask;
+             { Control word is index 0 }
+             state[0]:=Default8087CW;
+             { Status word is also index 1 }
+             state[1]:=status;
+             { Tag word is index 2 }
+             state[2]:=$ffff;
+          end;
        end;
    SIGILL:
        if sse_check then