vm: bugfix: wrong setup of closure param counts.

* lib.c (func_vm): The fixparam argument is the total number
of fixed parameters, including optionals. That argument must
be stored in the same-named member of the function structure.

1 files changed, 1 insertions, 1 deletions

diff --git a/lib.c b/lib.c
index 4906032e..8499ff98 100644
--- a/lib.c
+++ b/lib.c
@@ -6009,7 +6009,7 @@ val func_vm(val closure, val desc, int fixparam, int reqargs, int variadic)
   obj->f.functype = FVM;
   obj->f.env = closure;
   obj->f.f.vm_desc = desc;
-  obj->f.fixparam = reqargs;
+  obj->f.fixparam = fixparam;
   obj->f.optargs = fixparam - reqargs;
   obj->f.variadic = variadic;
   return obj;