1 files changed, 3 insertions, 0 deletions
diff --git a/numeric.c b/numeric.c
index 6503e26042..873272e6da 100644
--- a/numeric.c
+++ b/numeric.c
@@ -2767,6 +2767,9 @@ Init_Numeric()
 #elif defined(_UNICOSMP)
     /* Turn off floating point exceptions for divide by zero, etc. */
     _set_Creg(0, 0);
+#elif defined(__BORLANDC__)
+    /* Turn off floating point exceptions for overflow, etc. */
+    _control87(MCW_EM, MCW_EM);
 #endif
     id_coerce = rb_intern("coerce");
     id_to_i = rb_intern("to_i");