comparison src/lread.c @ 43669:4bd6b6b21deb

(read1): When reading from a file, default string to multibyte only if it has some multibyte characters.

43668:771bbdee433b

	  {
	    /* Nowadays, reading directly from a file is used only for
	       compiled Emacs Lisp files, and those always use the
	       Emacs internal encoding.  Meanwhile, Qlambda is used
	       for reading dynamic byte code (compiled with
	       byte-compile-dynamic = t).  */
	    to_multibyte (&p, &end, &nchars);
	    is_multibyte = 1;
	  }
	else
	  /* In all other cases, if we read these bytes as
	     separate characters, treat them as separate characters now.  */
	  ;

43669:4bd6b6b21deb

	  {
	    /* Nowadays, reading directly from a file is used only for
	       compiled Emacs Lisp files, and those always use the
	       Emacs internal encoding.  Meanwhile, Qlambda is used
	       for reading dynamic byte code (compiled with
	       byte-compile-dynamic = t).  So make the string multibyte
	       if the string contains any multibyte sequences.
	       (to_multibyte is a no-op if not.)  */
	    to_multibyte (&p, &end, &nchars);
	    is_multibyte = (p - read_buffer) != nchars;
	  }
	else
	  /* In all other cases, if we read these bytes as
	     separate characters, treat them as separate characters now.  */
	  ;