From: Kim F. Storm <storm@cua.dk>
Date: Mon, 21 Jun 2004 21:55:56 +0000 (+0000)
Subject: (add_to_log): Use SAFE_ALLOCA.
X-Git-Tag: ttn-vms-21-2-B4~5683
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=dbadb64b380769deacc0fd013197c11d25d6c197;p=emacs.git

(add_to_log): Use SAFE_ALLOCA.
---

diff --git a/src/xdisp.c b/src/xdisp.c
index cd712ac7485..c92a8ee79d2 100644
--- a/src/xdisp.c
+++ b/src/xdisp.c
@@ -6315,6 +6315,7 @@ add_to_log (format, arg1, arg2)
   char *buffer;
   int len;
   struct gcpro gcpro1, gcpro2, gcpro3, gcpro4;
+  USE_SAFE_ALLOCA;
 
   /* Do nothing if called asynchronously.  Inserting text into
      a buffer may call after-change-functions and alike and
@@ -6331,10 +6332,12 @@ add_to_log (format, arg1, arg2)
   msg = Fformat (3, args);
 
   len = SBYTES (msg) + 1;
-  buffer = (char *) alloca (len);
+  SAFE_ALLOCA (buffer, char *, len);
   bcopy (SDATA (msg), buffer, len);
 
   message_dolog (buffer, len - 1, 1, 0);
+  SAFE_FREE (len);
+
   UNGCPRO;
 }