From: Kenichi Handa <handa@m17n.org>
Date: Mon, 6 Apr 1998 05:06:12 +0000 (+0000)
Subject: (Fstring_as_unibyte): Set size_byte field to -1.
X-Git-Tag: emacs-20.3~1700
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa2517402679ee5c5c9da10e6200c8568a395af7;p=emacs.git

(Fstring_as_unibyte): Set size_byte field to -1.
---

diff --git a/src/fns.c b/src/fns.c
index c98cb2547b8..7bd7c5b613a 100644
--- a/src/fns.c
+++ b/src/fns.c
@@ -858,6 +858,7 @@ If STRING is unibyte, the result is STRING itself.")
     {
       string = Fcopy_sequence (string);
       XSTRING (string)->size = STRING_BYTES (XSTRING (string));
+      SET_STRING_BYTES (XSTRING (string), -1);
     }
   return string;
 }