* alloc.c (lisp_align_malloc): Omit unnecessary val==NULL tests.

diff --git a/src/ChangeLog b/src/ChangeLog
index b53d9b49a42d90957a52892a745b63956fddc68a..b7c1057ae7e762cf78ee3fe113cc492ac1c2f904 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-05-30  Paul Eggert  <eggert@cs.ucla.edu>
 
+       * alloc.c (lisp_align_malloc): Omit unnecessary val==NULL tests.
+
        * eval.c (Qdebug): Now static.
        * lisp.h (Qdebug): Remove decl.  This reverts a part of the
        2011-04-26T11:26:05Z!dan.colascione@gmail.com that inadvertently undid part of

diff --git a/src/alloc.c b/src/alloc.c
index 3f7bed571c77a771314b1ee9e1e6bfe13a95d006..8215cc53cd31659951b644987eb5505e0f5a73e7 100644 (file)
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -993,13 +993,11 @@ lisp_align_malloc (size_t nbytes, enum mem_type type)
   free_ablock = free_ablock->x.next_free;
 
 #if GC_MARK_STACK && !defined GC_MALLOC_CHECK
-  if (val && type != MEM_TYPE_NON_LISP)
+  if (type != MEM_TYPE_NON_LISP)
     mem_insert (val, (char *) val + nbytes, type);
 #endif
 
   MALLOC_UNBLOCK_INPUT;
-  if (!val && nbytes)
-    memory_full ();
 
   eassert (0 == ((uintptr_t) val) % BLOCK_ALIGN);
   return val;