diff --git a/libguile/modules.c b/libguile/modules.c
index f304df3df..554b9f141 100644
--- a/libguile/modules.c
+++ b/libguile/modules.c
@@ -191,6 +191,7 @@ scm_c_export (const char *name, ...)
       *tail = scm_cons (scm_str2symbol (n), SCM_EOL);
       tail = SCM_CDRLOC (*tail);
     }
+  va_end (ap);
   scm_call_2 (SCM_VARIABLE_REF (module_export_x_var),
 	      scm_current_module (), names);
 }