--- ./routines/default/scimem.c.orig	Mon Jul 20 07:50:29 1998
+++ ./routines/default/scimem.c	Sat Aug  8 13:13:30 1998
@@ -8,6 +8,25 @@
 #endif
 
-
 #include "../machine.h"
+
+#if defined(netbsd)
+#include <ieeefp.h>
+#endif
+
+#if defined(freebsd)
+#include <floatingpoint.h>
+#endif
+
+#if (defined(netbsd) || defined(freebsd))&& !defined(__alpha__)
+void C2F(nofpex)()
+{
+  fpsetmask(0);   /* Don't dump core on FPE return Inf or NaN */
+}
+#else
+void C2F(nofpex)()
+{
+  return;
+}
+#endif
 
 char *the_p=NULL;
