diff -uNr lua-5.1.5.orig/src/ldo.c lua-5.1.5/src/ldo.c
--- old/src/ldo.c	2016-11-28 20:04:13.177047928 +0100
+++ new/src/ldo.c	2016-11-28 20:07:15.170432525 +0100
@@ -274,7 +274,7 @@
     CallInfo *ci;
     StkId st, base;
     Proto *p = cl->p;
-    luaD_checkstack(L, p->maxstacksize);
+    luaD_checkstack(L, p->maxstacksize + p->numparams);
     func = restorestack(L, funcr);
     if (!p->is_vararg) {  /* no varargs? */
       base = func + 1;