2760 |
/* Coerce string to unibyte (like string-as-unibyte, |
/* Coerce string to unibyte (like string-as-unibyte, |
2761 |
but without generating extra garbage and |
but without generating extra garbage and |
2762 |
guaranteeing no change in the contents). */ |
guaranteeing no change in the contents). */ |
2763 |
SCHARS (bytestr) = SBYTES (bytestr); |
STRING_SET_CHARS (bytestr, SBYTES (bytestr)); |
2764 |
STRING_SET_UNIBYTE (bytestr); |
STRING_SET_UNIBYTE (bytestr); |
2765 |
|
|
2766 |
item = Fread (bytestr); |
item = Fread (bytestr); |