diff --git a/src/ikarus.boot b/src/ikarus.boot
index cc336f2..bd295e4 100644
Binary files a/src/ikarus.boot and b/src/ikarus.boot differ
diff --git a/src/ikarus.compiler.ss b/src/ikarus.compiler.ss
index e0f2eb9..93a40aa 100644
--- a/src/ikarus.compiler.ss
+++ b/src/ikarus.compiler.ss
@@ -2554,7 +2554,7 @@
         s))
     (define (check? x)
       (cond
-        [(primref? x) #f]  ;;;; PRIMREF CHECK
+        [(primref? x) #t]  ;;;; PRIMREF CHECK
         [(closure? x) #f]
         [else         #t]))
     (define (do-new-frame label op rand* si r