diff --git a/implementations/racket/preserves/preserves-schema/compiler.rkt b/implementations/racket/preserves/preserves-schema/compiler.rkt index 33f39f5..c45a0eb 100644 --- a/implementations/racket/preserves/preserves-schema/compiler.rkt +++ b/implementations/racket/preserves/preserves-schema/compiler.rkt @@ -112,7 +112,9 @@ (define (schema->module-stx name lookup-module-path schema #:filename [filename #f]) (schema-check-problems! schema #:name name) `(module ,name racket/base - (provide (all-defined-out)) + (provide (except-out (all-defined-out) :parse-embedded :embedded->preserves) + (rename-out [:parse-embedded ,(format-symbol ":parse-embedded:~a" name)] + [:embedded->preserves ,(format-symbol ":embedded->preserves:~a" name)])) ,@(module-imports name schema lookup-module-path filename) ,@(embedded-defs schema) (require preserves)