diff --git a/module/language/scheme/translate.scm b/module/language/scheme/translate.scm
index 3d2c13a6e..afa2276db 100644
--- a/module/language/scheme/translate.scm
+++ b/module/language/scheme/translate.scm
@@ -187,7 +187,7 @@
        ((,obj) (make-ghil-quasiquote e l (trans-quasiquote e l obj)))
        (else (bad-syntax))))
 
-    ((define define-private) ;; what is define-private?
+    ((define)
      (pmatch tail
        ;; (define NAME VAL)
        ((,name ,val) (guard (symbol? name))