I forgot embedded!

2021-06-08 16:15:53 +02:00 · 2021-06-08 16:15:53 +02:00 · feb6361029
parent 27002dfe7f
commit feb6361029
1 changed files with 1 additions and 0 deletions
--- 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)