lazarus ( gtk2-improve-exception-mask.diff


 lcl/interfaces/gtk2/ |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

download this patch

Patch contents

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-
--- lazarus-
+++ lazarus-
@@ -592,7 +592,7 @@
     {$IFDEF windows}
-      SetExceptionMask(GetExceptionMask + [exZeroDivide]);
+      SetExceptionMask(GetExceptionMask + [exZeroDivide, exInvalidOp]);