summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1994-06-02 17:45:40 +0000
committerRichard M. Stallman <rms@gnu.org>1994-06-02 17:45:40 +0000
commite3a24fc596de3dfaed321a6fd5fea876d580998d (patch)
tree5d14463a774e9e0156ff6977473704c92019a7fd
parentbb38b0c253bc201557de651f4145018006bf6890 (diff)
downloadgunmake-e3a24fc596de3dfaed321a6fd5fea876d580998d.tar.gz
[emacs]: Block input around the garbage reclamation.
Include blockinput.h.
-rw-r--r--alloca.c12
1 files changed, 12 insertions, 0 deletions
diff --git a/alloca.c b/alloca.c
index bd4932a..d1f4d1a 100644
--- a/alloca.c
+++ b/alloca.c
@@ -29,6 +29,10 @@
#endif
#endif
+#ifdef emacs
+#include "blockinput.h"
+#endif
+
/* If compiling with GCC 2, this file's not needed. */
#if !defined (__GNUC__) || __GNUC__ < 2
@@ -176,6 +180,10 @@ alloca (size)
{
register header *hp; /* Traverses linked list. */
+#ifdef emacs
+ BLOCK_INPUT;
+#endif
+
for (hp = last_alloca_header; hp != NULL;)
if ((STACK_DIR > 0 && hp->h.deep > depth)
|| (STACK_DIR < 0 && hp->h.deep < depth))
@@ -190,6 +198,10 @@ alloca (size)
break; /* Rest are not deeper. */
last_alloca_header = hp; /* -> last valid storage. */
+
+#ifdef emacs
+ UNBLOCK_INPUT;
+#endif
}
if (size == 0)