diff --git a/racket/src/cs/main.sps b/racket/src/cs/main.sps
index cae7f25f01..8aa77625aa 100644
--- a/racket/src/cs/main.sps
+++ b/racket/src/cs/main.sps
@@ -340,7 +340,7 @@
                          (call-with-values (lambda ()
                                              (call-with-continuation-prompt
                                               (lambda ()
-                                                (eval (read (open-input-string expr))))
+                                                (eval `(|#%top-interaction| . ,(read (open-input-string expr)))))
                                               (default-continuation-prompt-tag)
                                               (lambda (proc)
                                                 ;; continue escape to set error status: