diff options
author | Luc Teirlinck <teirllm@auburn.edu> | 2004-07-06 17:55:00 +0000 |
---|---|---|
committer | Luc Teirlinck <teirllm@auburn.edu> | 2004-07-06 17:55:00 +0000 |
commit | a085bf9dd6bc5a1e3cf80e8e23b83ef6786c8911 (patch) | |
tree | 375d28ea7dac683d38f46b79c561b763ce069a72 /src/fns.c | |
parent | cc0aea1a20e2afff0524de88f4e708f4e0fc0bae (diff) | |
download | emacs-a085bf9dd6bc5a1e3cf80e8e23b83ef6786c8911.tar.gz |
(Fclear_string): Put call to CHECK_STRING in correct place.
Diffstat (limited to 'src/fns.c')
-rw-r--r-- | src/fns.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/fns.c b/src/fns.c index cbd0dc91d2b..4dd04bf0b50 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2370,8 +2370,8 @@ This makes STRING unibyte and may change its length. */) (string) Lisp_Object string; { - CHECK_STRING (string); int len = SBYTES (string); + CHECK_STRING (string); bzero (SDATA (string), len); STRING_SET_CHARS (string, len); STRING_SET_UNIBYTE (string); |