X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=src%2Falloca.c;h=500327fd6f9b0a0ead9c65839a20466bc2456fbd;hb=8b6b965da075da197b3d654db3405aa6846bd3d8;hp=c1eecff1f54677b7e1ec51a89fca7fcbf108634c;hpb=59eec5f21669e81977b5b1fe9bf717cab49cf7fb;p=chise%2Fxemacs-chise.git.1 diff --git a/src/alloca.c b/src/alloca.c index c1eecff..500327f 100644 --- a/src/alloca.c +++ b/src/alloca.c @@ -100,7 +100,7 @@ void xfree (pointer); Callers below should use malloc. */ -#ifndef emacs +#ifdef emacs #define malloc xmalloc #endif #ifndef WIN32_NATIVE @@ -387,7 +387,7 @@ i00afunc (long *address) a fatal error if "trailer" is null. */ if (trailer == 0) - abort (); + ABORT (); /* Discard segments that do not contain our argument address. */ @@ -396,7 +396,7 @@ i00afunc (long *address) block = (long *) trailer->this_address; size = trailer->this_size; if (block == 0 || size == 0) - abort (); + ABORT (); trailer = (struct stk_trailer *) trailer->link; if ((block <= address) && (address < (block + size))) break; @@ -415,7 +415,7 @@ i00afunc (long *address) do { if (trailer->this_size <= 0) - abort (); + ABORT (); result += trailer->this_size; trailer = (struct stk_trailer *) trailer->link; }