From b968f77ff66ac0beb2551ee957bcba94889d38a0 Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Wed, 2 Jun 2021 12:35:33 +0200 Subject: [PATCH] Provide fold-Schema-definitions and map-Schema-definitions --- .../racket/preserves/preserves-schema/compiler.rkt | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/implementations/racket/preserves/preserves-schema/compiler.rkt b/implementations/racket/preserves/preserves-schema/compiler.rkt index f5b407b..fe5fa26 100644 --- a/implementations/racket/preserves/preserves-schema/compiler.rkt +++ b/implementations/racket/preserves/preserves-schema/compiler.rkt @@ -2,7 +2,9 @@ (provide schema->module-stx (struct-out schema-compiler-options) - (struct-out schema-translation-paths)) + (struct-out schema-translation-paths) + fold-Schema-definitions + map-Schema-definitions) (require preserves) (require racket/match)