diff --git a/runtime.c b/runtime.c
index 043ac8d2..a2b8ec41 100644
--- a/runtime.c
+++ b/runtime.c
@@ -298,7 +298,7 @@ object dispatch_display_va(int argc, object clo, object cont, object x, ...) {
   va_start(ap, x);
   result = Cyc_display_va_list(argc - 1, x, ap);
   va_end(ap);
-  return_funcall1(cont, &result);
+  return_funcall1(cont, result);
 }
 
 object Cyc_display_va(int argc, object x, ...) {
@@ -411,7 +411,7 @@ object dispatch_write_va(int argc, object clo, object cont, object x, ...) {
   va_start(ap, x);
   result = Cyc_write_va_list(argc - 1, x, ap);
   va_end(ap);
-  return_funcall1(cont, &result);
+  return_funcall1(cont, result);
 }
 
 object Cyc_write_va(int argc, object x, ...) {
diff --git a/test.scm b/test.scm
index 7de7ba0d..91d5f924 100644
--- a/test.scm
+++ b/test.scm
@@ -20,7 +20,7 @@
 (define b (vector 10 20 30 40 50))
 (vector-copy! b 1 a 0 2)
 (write (equal? b #(10 1 2 40 50)))
-(call-with-values 
-  (lambda () (values 1 1))
-  (lambda (a) (write a)))
+;(call-with-values 
+;  (lambda () (values 1 1))
+;  (lambda (a) (write a)))