diff --git a/src/core/n-math.c b/src/core/n-math.c
index 7033f669b9..482f5cb44c 100644
--- a/src/core/n-math.c
+++ b/src/core/n-math.c
@@ -969,7 +969,7 @@ enum {SINE, COSINE, TANGENT};
 //	]
 ***********************************************************************/
 {
-	double *intptr;
+	double intptr;
 	SET_DECIMAL(D_RET, modf(VAL_DECIMAL(D_ARG(1)), &intptr));
 	return R_RET;
 }