mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-01-03 02:31:03 -08:00
Code Issues Projects Releases Wiki Activity

(Fccl_execute_on_string): Don't check xmalloc return. Use xfree, not

Browse source 
free.
This commit is contained in:
Dave Love 2000-07-20 12:50:09 +00:00
parent ec68e3237e
commit 157f852b76
1 changed files with 1 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/ccl.c
View file

@ -1894,8 +1894,6 @@ is a unibyte string. By default it is a multibyte string.")
}
outbufsize = STRING_BYTES (XSTRING (str)) * ccl.buf_magnification + 256;
outbuf = (char *) xmalloc (outbufsize);
if (!outbuf)
error ("Not enough memory");
ccl.last_block = NILP (contin);
produced = ccl_driver (&ccl, XSTRING (str)->data, outbuf,
STRING_BYTES (XSTRING (str)), outbufsize, (int *)0);
@ -1908,7 +1906,7 @@ is a unibyte string. By default it is a multibyte string.")
val = make_string (outbuf, produced);
else
val = make_unibyte_string (outbuf, produced);
free (outbuf);
xfree (outbuf);
QUIT;
if (ccl.status != CCL_STAT_SUCCESS
&& ccl.status != CCL_STAT_SUSPEND_BY_SRC