diff --git a/module/system/base/compile.scm b/module/system/base/compile.scm
index 31801dbf9..4e5057e7a 100644
--- a/module/system/base/compile.scm
+++ b/module/system/base/compile.scm
@@ -35,8 +35,7 @@
 
 (define-record (<cenv> vm language module))
 
-(define-public (make-cenv . rest)
-  (apply <cenv> rest))
+(export make-cenv)
 
 (define-public (syntax-error loc msg exp)
   (throw 'syntax-error loc msg exp))