Delphi/c++builder 中出现 "float operation exception"

编译好的 dll 在 c++ builder 64 位中调用,出现 "float operation exception".

尝试了 32位, 没有问题.

尝试了纯console 的 c++ builder 程序, 也没有问题. 只有包含 vcl 的 c++ builder 程序才有问题.

让我感觉到可能是 vcl 改变了 runtime 的某种行为.

跟踪了代码, 异常发生在这一行:
https://github.com/v8/v8/blob/3.20.17/src/conversions.h#L75

inline int FastD2I(double x) {
  return static_cast(x);
}
</code></pre>
当 x 大于 int 的 max 值时,问题出现.
虽然这种转换会导致溢出,  但是怎么会引发异常呢?
然后找到:

https://www.opengl.org/discussion_boards/showthread.php/156817-Disabling-Floating-Point-Exceptions
看起来, opengl 也遇到相同的问题.
然后找到:

https://social.msdn.microsoft.com/Forums/vstudio/en-US/c310909a-fe07-4a4e-92d7-be2e1dc81137/finding-cause-of-floating-point-invalid-operation?forum=vsdebug
最终找到了这篇文章:

https://blogs.msdn.microsoft.com/dougste/2008/11/12/random-and-unexpected-exception_flt_divide_by_zero-and-exception_flt_invalid__operation/
原来 cpu 在操作浮点数时有专门的 fpu 寄存器.
而浮点数如果出现溢出等情况时, 是否导致异常是由一个专门的寄存器 fpcw 控制.
在 windows 平台上, fpcw 的值默认是忽略浮点溢出的异常的.

但是有的程序可能会改变 fpcw 的值, 来引发异常.
解决方案: 执行自己的代码时, 恢复 fpcw 的默认值, 用完再回滚.
头文件:
#include "float.h"

获得当前 fpcw 的值:
int old_fpcw = _controlfp(0,0)

设置 fpcw 为 windows 上的默认值:
_controlfp(MCW_EM, MCW_EM);

用完后, 回滚到原始值:
_controlfp(old_fpcw, _MCW_DN | _MCW_EM |_MCW_RC  )

另外, 这里还有一篇文章介绍fpu 的工作方式:

http://www.website.masmforum.com/tutorials/fptute/fpuchap1.htm

Delphi/c++builder 中出现 "float operation exception"

Comments