mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2026-04-20 13:00:51 -07:00
Code Issues Projects Releases Wiki Activity

Tweak Fdirectory_append for efficiency

Browse source 
* src/fileio.c (Fdirectory_append): Make slightly more efficient.
This commit is contained in:
Lars Ingebrigtsen 2021-07-24 17:28:10 +02:00
parent b4543dfa9e
commit 28bf38743d
1 changed files with 2 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

3
src/fileio.c
View file

@ -795,7 +795,8 @@ usage: (record DIRECTORY &rest COMPONENTS) */)
for (i = 0; i < nargs; i++)
{
Lisp_Object arg = args[i];
if (STRING_MULTIBYTE (arg))
/* Use multibyte or all-ASCII strings as is. */
if (STRING_MULTIBYTE (arg) || SCHARS (arg) == SBYTES (arg))
elements[i] = arg;
else
elements[i] = make_multibyte_string (SSDATA (arg), SCHARS (arg),