XEmacs 21.4.17 "Jumbo Shrimp".

[chise/xemacs-chise.git.1] / src / alloca.c

diff --git a/src/alloca.c b/src/alloca.c
index c1eecff..500327f 100644 (file)
--- 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;
     }