changeset 89222:5db2e48ffbcb

(byte-compile-lapcode): Be sure to return a unibyte string.
author Kenichi Handa <handa@m17n.org>
date Wed, 16 Oct 2002 02:16:02 +0000
parents e6779a6185ca
children 0e24243cf8f9
files lisp/emacs-lisp/bytecomp.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/emacs-lisp/bytecomp.el	Wed Oct 16 02:14:49 2002 +0000
+++ b/lisp/emacs-lisp/bytecomp.el	Wed Oct 16 02:16:02 2002 +0000
@@ -757,7 +757,7 @@
 	       (setcar (cdr bytes) (logand pc 255))
 	       (setcar bytes (lsh pc -8))))
 	(setq patchlist (cdr patchlist))))
-    (concat (nreverse bytes))))
+    (string-make-unibyte (concat (nreverse bytes)))))
 
 
 ;;; compile-time evaluation