diff --git a/rtl/darwin/arm/sighnd.inc b/rtl/darwin/arm/sighnd.inc index 502de46b80..0a30e8ee79 100644 --- a/rtl/darwin/arm/sighnd.inc +++ b/rtl/darwin/arm/sighnd.inc @@ -33,7 +33,8 @@ begin Else Res:=207; {coprocessor error} end; - SigContext^.uc_mcontext^.__fs.__fpscr := SigContext^.uc_mcontext^.__fs.__fpscr and not($1fff); + { clear "exception happened" flags } + SigContext^.uc_mcontext^.__fs.__fpscr := SigContext^.uc_mcontext^.__fs.__fpscr and not($df); end; SIGBUS: res:=214;