diff options
author | Bruno Haible <bruno@clisp.org> | 2022-05-11 13:00:53 +0200 |
---|---|---|
committer | Bruno Haible <bruno@clisp.org> | 2022-05-11 13:05:33 +0200 |
commit | 343f300f5f29c7d9f45b5247f89e353f0aa5e2d5 (patch) | |
tree | 8eccb0d146d9960b2a3d23a5c6618c26e0e1a32d /lib | |
parent | 2f2f597641b4350915ea64c2457587d24d3fc9e2 (diff) | |
download | gnulib-343f300f5f29c7d9f45b5247f89e353f0aa5e2d5.tar.gz |
alloca: Remove old code for Emacs, unused since 2009.
Reported by Reuben Thomas <rrt@sc3d.org> in
<https://lists.gnu.org/archive/html/bug-gnulib/2022-05/msg00032.html>.
* lib/alloca.c: Remove Emacs specific code.
Diffstat (limited to 'lib')
-rw-r--r-- | lib/alloca.c | 35 |
1 files changed, 0 insertions, 35 deletions
diff --git a/lib/alloca.c b/lib/alloca.c index 48802832a8..5eb16a9ff5 100644 --- a/lib/alloca.c +++ b/lib/alloca.c @@ -30,17 +30,6 @@ #include <string.h> #include <stdlib.h> -#ifdef emacs -# include "lisp.h" -# include "blockinput.h" -# ifdef EMACS_FREE -# undef free -# define free EMACS_FREE -# endif -#else -# define memory_full() abort () -#endif - /* If compiling with GCC or clang, this file is not needed. */ #if !(defined __GNUC__ || defined __clang__) @@ -48,22 +37,6 @@ there must be some other way alloca is supposed to work. */ # ifndef alloca -# ifdef emacs -# ifdef static -/* actually, only want this if static is defined as "" - -- this is for usg, in which emacs must undefine static - in order to make unexec workable - */ -# ifndef STACK_DIRECTION -you -lose --- must know STACK_DIRECTION at compile-time -/* Using #error here is not wise since this file should work for - old and obscure compilers. */ -# endif /* STACK_DIRECTION undefined */ -# endif /* static */ -# endif /* emacs */ - /* Define STACK_DIRECTION if you know the direction of stack growth for your system; otherwise it will be automatically deduced at run-time. @@ -145,10 +118,6 @@ alloca (size_t 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)) @@ -163,10 +132,6 @@ alloca (size_t size) break; /* Rest are not deeper. */ last_alloca_header = hp; /* -> last valid storage. */ - -# ifdef emacs - UNBLOCK_INPUT; -# endif } if (size == 0) |