diff --git a/src/compiler.rls b/src/compiler.rls
index c919ccc..2c2bfa8 100644
--- a/src/compiler.rls
+++ b/src/compiler.rls
@@ -646,7 +646,7 @@
                                 report-use-before-set)
                             (lambda (val) (set-car! accessors (lambda () val))))])
     (hash-table-insert *top-level-variables* symbol accessors)
-    (apply values accessors)))
+    accessors))
 
 (define (register-top-level-binding symbol value)
   (register-symbols (list symbol))