add special case for (apply values ...)

[bpt/guile.git] / libguile / vm-engine.c

diff --git a/libguile/vm-engine.c b/libguile/vm-engine.c
index 14f444c..48b6ae5 100644 (file)
--- a/libguile/vm-engine.c
+++ b/libguile/vm-engine.c
@@ -65,6 +65,7 @@ vm_run (SCM vm, SCM program, SCM args)
 
   /* Internal variables */
   int nargs = 0;
+  int nvalues = 0;
   long start_time = scm_c_get_internal_run_time ();
   // SCM dynwinds = SCM_EOL;
   SCM err_msg;