From c792a7533caba170bb5dcc7d75f24ba5aa6f6c07 Mon Sep 17 00:00:00 2001
From: Kevin Ryde <user42@zip.com.au>
Date: Sat, 27 May 2006 22:48:28 +0000
Subject: [PATCH] Add malloc.h to get alloca() on mingw.

---
 libguile/eval.c | 3 +++
 1 file changed, 3 insertions(+)

diff --git a/libguile/eval.c b/libguile/eval.c
index 5c9801c5b..9fe419137 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -53,6 +53,9 @@ char *alloca ();
 #  endif
 # endif
 #endif
+#if HAVE_MALLOC_H
+#include <malloc.h> /* alloca on mingw */
+#endif
 
 #include <assert.h>
 #include "libguile/_scm.h"