diff --git a/implementations/racket/preserves/preserves-schema/methods.rkt b/implementations/racket/preserves/preserves-schema/methods.rkt index d84b52f..cd64ae8 100644 --- a/implementations/racket/preserves/preserves-schema/methods.rkt +++ b/implementations/racket/preserves/preserves-schema/methods.rkt @@ -27,6 +27,7 @@ (for/hash [((k v) (in-hash preservable))] (values (*->preserve k) (*->preserve v))))]) #:defaults ([float? (define (->preserve preservable) preservable)] + [embedded? (define (->preserve preservable) preservable)] [record? (define/generic *->preserve ->preserve) (define (->preserve preservable)