fix invalid write into emit_limple_insn

diff --git a/src/comp.c b/src/comp.c
index a7a5ce0dcbe26595d5ec4ba99ba45b30f7bcadc5..3b124bef23a5b6540adee467e7eb99fe89c9f838 100644 (file)
--- a/src/comp.c
+++ b/src/comp.c
@@ -1182,7 +1182,8 @@ emit_limple_insn (Lisp_Object insn)
   unsigned i = 0;
   FOR_EACH_TAIL (p)
     {
-      eassert (i < sizeof (arg));
+      if (i == sizeof (arg) / sizeof (Lisp_Object))
+       break;
       arg[i++] = XCAR (p);
     }