diff --git a/Objects/floatobject.c b/Objects/floatobject.c
index 6f5b625c4cd..070e83def9a 100644
--- a/Objects/floatobject.c
+++ b/Objects/floatobject.c
@@ -83,6 +83,16 @@ extern double fmod Py_PROTO((double, double));
 extern double pow Py_PROTO((double, double));
 #endif
 
+#ifdef sun
+/* On SunOS4.1 only libm.a exists. Make sure that references to all
+   needed math functions exist in the executable, so that dynamic
+   loading of mathmodule does not fail. */
+double (*_Py_math_funcs_hack[])() = {
+	acos, asin, atan, atan2, ceil, cos, cosh, exp, fabs, floor,
+	fmod, log, log10, pow, sin, sinh, sqrt, tan, tanh
+};
+#endif
+
 /* Special free list -- see comments for same code in intobject.c. */
 static PyFloatObject *free_list = NULL;
 #define BLOCK_SIZE	1000	/* 1K less typical malloc overhead */