Commit f61bef8b authored by Kim F. Storm's avatar Kim F. Storm
Browse files

(safe_alloca_unwind): New function.

parent 79518a8d
......@@ -579,6 +579,17 @@ xstrdup (s)
}
/* Unwind for SAFE_ALLOCA */
Lisp_Object
safe_alloca_unwind (arg)
Lisp_Object arg;
{
xfree (XSAVE_VALUE (arg)->pointer);
return Qnil;
}
/* Like malloc but used for allocating Lisp data. NBYTES is the
number of bytes to allocate, TYPE describes the intended use of the
allcated memory block (for strings, for conses, ...). */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment