(concat): Check for string overflow (bug#1787).

0f75abdf · Chong Yidong · 930600e9 · 0f75abdf
Commit 0f75abdf authored Jan 27, 2009 by Chong Yidong
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 0 deletions

src/fns.c src/fns.c +2 -0

No files found.
--- a/src/fns.c
+++ b/src/fns.c
@@ -603,6 +603,8 @@ concat (nargs, args, target_type, last_special)
 	}

      result_len += len;
+      if (result_len < 0)
+	error ("String overflow");
    }

  if (! some_multibyte)