diff options
Diffstat (limited to 'src/fns.c')
-rw-r--r-- | src/fns.c | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/src/fns.c b/src/fns.c index e5538d6acbc..a3af6b8c15a 100644 --- a/src/fns.c +++ b/src/fns.c @@ -602,12 +602,7 @@ concat (ptrdiff_t nargs, Lisp_Object *args, prev = Qnil; if (STRINGP (val)) - { - if (min (PTRDIFF_MAX, SIZE_MAX) / sizeof *textprops < nargs) - memory_full (SIZE_MAX); - SAFE_ALLOCA (textprops, struct textprop_rec *, - sizeof *textprops * nargs); - } + SAFE_NALLOCA (textprops, 1, nargs); for (argnum = 0; argnum < nargs; argnum++) { |