comparison src/fns.c @ 56364:78e8df7d1ad8

(Fclear_string): Correct previous change.

56363:278fbbc28f40

       doc: /* Clear the contents of STRING.
This makes STRING unibyte and may change its length.  */)
     (string)
     Lisp_Object string;
{
  int len = SBYTES (string);
  CHECK_STRING (string);
  bzero (SDATA (string), len);
  STRING_SET_CHARS (string, len);
  STRING_SET_UNIBYTE (string);
  return Qnil;
}

56364:78e8df7d1ad8

       doc: /* Clear the contents of STRING.
This makes STRING unibyte and may change its length.  */)
     (string)
     Lisp_Object string;
{
  int len;
  CHECK_STRING (string);
  len = SBYTES (string);
  bzero (SDATA (string), len);
  STRING_SET_CHARS (string, len);
  STRING_SET_UNIBYTE (string);
  return Qnil;
}