summaryrefslogtreecommitdiff
path: root/libguile/eval.c
diff options
context:
space:
mode:
Diffstat (limited to 'libguile/eval.c')
-rw-r--r--libguile/eval.c19
1 files changed, 19 insertions, 0 deletions
diff --git a/libguile/eval.c b/libguile/eval.c
index 44b51768c..d9129dcbc 100644
--- a/libguile/eval.c
+++ b/libguile/eval.c
@@ -54,6 +54,25 @@
#ifndef DEVAL
+/* AIX requires this to be the first thing in the file. The #pragma
+ directive is indented so pre-ANSI compilers will ignore it, rather
+ than choke on it. */
+#ifdef __GNUC__
+# define alloca __builtin_alloca
+#else
+# if HAVE_ALLOCA_H
+# include <alloca.h>
+# else
+# ifdef _AIX
+ #pragma alloca
+# else
+# ifndef alloca /* predefined by HP cc +Olibcalls */
+char *alloca ();
+# endif
+# endif
+# endif
+#endif
+
#include <stdio.h>
#include "_scm.h"
#include "debug.h"