From cfd236932d80bf74ced790212acbf9b4d108926a Mon Sep 17 00:00:00 2001 From: Luc Teirlinck Date: Tue, 6 Jul 2004 19:36:56 +0000 Subject: [PATCH] (Fclear_string): Correct previous change. --- src/fns.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/fns.c b/src/fns.c index 4dd04bf0b50..06d04781789 100644 --- a/src/fns.c +++ b/src/fns.c @@ -2370,8 +2370,9 @@ This makes STRING unibyte and may change its length. */) (string) Lisp_Object string; { - int len = SBYTES (string); + int len; CHECK_STRING (string); + len = SBYTES (string); bzero (SDATA (string), len); STRING_SET_CHARS (string, len); STRING_SET_UNIBYTE (string); -- 2.39.2