mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-03-06 05:52:32 -08:00
Code Issues Projects Releases Wiki Activity

(Fclear_string): Signal an error if STRING is not a string.

Browse source
This commit is contained in:
John Paul Wallington 2004-07-06 05:08:57 +00:00
parent 8e975df9c8
commit fa164e6ae7
2 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/ChangeLog
View file

@ -2,6 +2,8 @@
* eval.c (Fdefmacro): Signal an error if NAME is not a symbol.
* fns.c (Fclear_string): Signal an error if STRING is not a string.
2004-07-05 Jan Dj,Ad(Brv <jan.h.d@swipnet.se>
* macterm.c (mac_initialize_display_info): Use CGGetActiveDisplayList

1
src/fns.c
View file

@ -2370,6 +2370,7 @@ This makes STRING unibyte and may change its length. */)
(string)
Lisp_Object string;
{
CHECK_STRING (string);
int len = SBYTES (string);
bzero (SDATA (string), len);
STRING_SET_CHARS (string, len);