Origin: https://bugs.launchpad.net/ubuntu/+source/winff/+bug/521818/comments/51
Bug: http://mantis.freepascal.org/view.php?id=15840
Author: Flávio Etrusco
Forwarded: not needed
Descripton: This is to avoid trapping some FPU exceptions, since C code handles
them differently, or that the CPU exception flag is leftover from the C
library function call which C code wouldn't bother but FPC needs it to be
explicitly cleared upon the function return.
Index: lazarus-0.9.28.2/lcl/interfaces/gtk2/gtk2widgetset.inc
===================================================================
--- lazarus-0.9.28.2.orig/lcl/interfaces/gtk2/gtk2widgetset.inc
+++ lazarus-0.9.28.2/lcl/interfaces/gtk2/gtk2widgetset.inc
@@ -592,7 +592,7 @@
{$IFDEF windows}
Set8087CW($133F);
{$ELSE}
- SetExceptionMask(GetExceptionMask + [exZeroDivide]);
+ SetExceptionMask(GetExceptionMask + [exZeroDivide, exInvalidOp]);
{$ENDIF}
{$ENDIF}
{$ifend}