diff --git a/collects/honu/core/main.rkt b/collects/honu/core/main.rkt
index 58fcb6879d..6f0b03bf56 100644
--- a/collects/honu/core/main.rkt
+++ b/collects/honu/core/main.rkt
@@ -61,6 +61,8 @@
                      (honu-. |.|)
                      )
 
+         (rename-out [honu-print print])
+
          #%top
 
          ;; sql nonsense
diff --git a/collects/honu/core/private/honu-typed-scheme.rkt b/collects/honu/core/private/honu-typed-scheme.rkt
index 7f58336d44..043e153582 100644
--- a/collects/honu/core/private/honu-typed-scheme.rkt
+++ b/collects/honu/core/private/honu-typed-scheme.rkt
@@ -621,6 +621,9 @@ if (foo){
                      (honu-unparsed-begin forms ...))
                     (#%plain-module-begin (honu-unparsed-begin forms ...)))
 
+(define (honu-print arg)
+  (printf "~a\n" arg))
+
 (define-syntax (#%dynamic-honu-module-begin stx)
   (syntax-case stx ()
     [(_ forms ...)