diff --git a/simulator.rkt b/simulator.rkt
index 51a2a24..8f183f9 100644
--- a/simulator.rkt
+++ b/simulator.rkt
@@ -372,7 +372,7 @@
           [(>=)   
            (chain-compare >= (map ensure-real-number rand-vals))]
           [(cons)
-           (make-MutablePair (first rand-vals) (ensure-list (second rand-vals)))]
+           (make-MutablePair (first rand-vals) (second rand-vals))]
           [(car)
            (MutablePair-h (ensure-mutable-pair (first rand-vals)))]
           [(cdr)
diff --git a/test-conform.rkt b/test-conform.rkt
index 52df364..10c6745 100644
--- a/test-conform.rkt
+++ b/test-conform.rkt
@@ -68,4 +68,5 @@
 
 (test (read (open-input-file "tests/conform/program0.sch"))
       (port->string (open-input-file "tests/conform/expected0.txt"))
-      #:debug? #t)
+      ;#:debug? #t
+      )