From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 6 May 1994 06:45:18 +0000 (+0000)
Subject: (error): Fix logic in call to xmalloc/xrealloc.
X-Git-Tag: emacs-19.34~8500
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=5ece1728e2a47c56a22475affab317bdc4dccee6;p=emacs.git

(error): Fix logic in call to xmalloc/xrealloc.
---

diff --git a/src/eval.c b/src/eval.c
index 0643655f0f3..8aadc0b0a9a 100644
--- a/src/eval.c
+++ b/src/eval.c
@@ -1331,7 +1331,11 @@ error (m, a1, a2, a3)
       size *= 2;
       if (allocated)
 	buffer = (char *) xrealloc (buffer, size);
-      buffer = (char *) xmalloc (size);
+      else
+	{
+	  buffer = (char *) xmalloc (size);
+	  allocated = 1;
+	}
     }
 
   string = build_string (buf);