Skip to content

GitLab

Commit 470730a8 authored by Kenichi Handa's avatar Kenichi Handa
Browse files

(concat): Check STRINGP before increasing result_len_byte.

parent e68e61b5
Hide whitespace changes
Inline Side-by-side
Showing with 1 addition and 1 deletion
src/fns.c
View file @ 470730a8
...@@ -456,7 +456,7 @@ concat (nargs, args, target_type, last_special) ...@@ -456,7 +456,7 @@ concat (nargs, args, target_type, last_special)
if (this_len_byte > 1) if (this_len_byte > 1)
some_multibyte = 1; some_multibyte = 1;
} }
else else if (STRINGP (this))
{ {
result_len_byte += XSTRING (this)->size_byte; result_len_byte += XSTRING (this)->size_byte;
if (STRING_MULTIBYTE (this)) if (STRING_MULTIBYTE (this))
......
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