Commit b51ee131 authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(Fprin1_to_string): Return unibyte string if possible.

parent ee24a852
......@@ -775,6 +775,8 @@ A printed representation of an object is text which describes that object. */)
PRINTFINISH;
set_buffer_internal (XBUFFER (Vprin1_to_string_buffer));
object = Fbuffer_string ();
if (SBYTES (object) == SCHARS (object))
STRING_SET_UNIBYTE (object);
Ferase_buffer ();
set_buffer_internal (old);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment