/* This code is similar to intern function from lread.c. */
obarray = check_obarray (Vobarray);
parse_str_as_multibyte ((unsigned char *) str, len, &nchars, &nbytes);
- tem = oblookup (obarray, str,
- (len == nchars || len != nbytes) ? len : nchars, len);
-
- if (SYMBOLP (tem))
- return tem;
tem = make_specified_string (str, nchars, len,
- len != nchars && len == nbytes);
+ len != nchars && len == nbytes);
return Fintern (tem, obarray);
}