projects
/
gnulib.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Propagating gettext into gnulib a bit better.
[gnulib.git]
/
lib
/
alloca.c
diff --git
a/lib/alloca.c
b/lib/alloca.c
index
5e2521b
..
a580078
100644
(file)
--- a/
lib/alloca.c
+++ b/
lib/alloca.c
@@
-31,13
+31,12
@@
#ifdef emacs
# include "lisp.h"
# include "blockinput.h"
#ifdef emacs
# include "lisp.h"
# include "blockinput.h"
-# define xalloc_die() memory_full ()
# ifdef EMACS_FREE
# undef free
# define free EMACS_FREE
# endif
#else
# ifdef EMACS_FREE
# undef free
# define free EMACS_FREE
# endif
#else
-#
include <xalloc.h>
+#
define memory_full() abort ()
#endif
/* If compiling with GCC 2, this file's not needed. */
#endif
/* If compiling with GCC 2, this file's not needed. */
@@
-196,22
+195,25
@@
alloca (size_t size)
{
/* Address of header. */
{
/* Address of header. */
- register
void
*new;
+ register
header
*new;
size_t combined_size = sizeof (header) + size;
if (combined_size < sizeof (header))
size_t combined_size = sizeof (header) + size;
if (combined_size < sizeof (header))
-
xalloc_die
();
+
memory_full
();
- new =
x
malloc (combined_size);
+ new = malloc (combined_size);
- ((header *) new)->h.next = last_alloca_header;
-
((header *) new)->h.deep = depth
;
+ if (! new)
+
memory_full ()
;
- last_alloca_header = (header *) new;
+ new->h.next = last_alloca_header;
+ new->h.deep = depth;
+
+ last_alloca_header = new;
/* User storage begins just after header. */
/* User storage begins just after header. */
- return (void *) (
(char *) new + sizeof (header)
);
+ return (void *) (
new + 1
);
}
}
}
}