X-Git-Url: http://erislabs.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=lib%2Falloca.c;h=c4db187da555e7c1eaf383fb2631670db8520ab4;hb=265465e1145409720be48d30b6277a59151d293a;hp=fd95a34d63a7d8f7ddd4c3845a9dda6a3060d6be;hpb=a60e4adbcd19c2e45803804a57023eb943eb5777;p=gnulib.git diff --git a/lib/alloca.c b/lib/alloca.c index fd95a34d6..c4db187da 100644 --- a/lib/alloca.c +++ b/lib/alloca.c @@ -25,12 +25,8 @@ # include #endif -#if HAVE_STRING_H -# include -#endif -#if HAVE_STDLIB_H -# include -#endif +#include +#include #ifdef emacs # include "lisp.h" @@ -77,19 +73,6 @@ long i00afunc (); # define ADDRESS_FUNCTION(arg) &(arg) # endif -# ifndef POINTER_TYPE -# ifdef __STDC__ -# define POINTER_TYPE void -# else -# define POINTER_TYPE char -# endif -# endif -typedef POINTER_TYPE *pointer; - -# ifndef NULL -# define NULL 0 -# endif - /* Define STACK_DIRECTION if you know the direction of stack growth for your system; otherwise it will be automatically deduced at run-time. @@ -112,7 +95,7 @@ static int stack_dir; /* 1 or -1 once known. */ # define STACK_DIR stack_dir static void -find_stack_direction () +find_stack_direction (void) { static char *addr = NULL; /* Address of first `dummy', once known. */ auto char dummy; /* To get stack address. */ @@ -165,9 +148,8 @@ static header *last_alloca_header = NULL; /* -> last alloca header. */ caller, but that method cannot be made to work for some implementations of C, for example under Gould's UTX/32. */ -pointer -alloca (size) - size_t size; +void * +alloca (size_t size) { auto char probe; /* Probes stack depth: */ register char *depth = ADDRESS_FUNCTION (probe); @@ -193,7 +175,7 @@ alloca (size) { register header *np = hp->h.next; - free ((pointer) hp); /* Collect garbage. */ + free (hp); /* Collect garbage. */ hp = np; /* -> next header. */ } @@ -214,7 +196,7 @@ alloca (size) { /* Address of header. */ - register pointer new; + register void *new; size_t combined_size = sizeof (header) + size; if (combined_size < sizeof (header)) @@ -232,7 +214,7 @@ alloca (size) /* User storage begins just after header. */ - return (pointer) ((char *) new + sizeof (header)); + return (void *) ((char *) new + sizeof (header)); } }