forked from syndicate-lang/preserves
Allow void to be `->preserve`able
This commit is contained in:
parent
f808e37e89
commit
da513a249e
|
@ -12,7 +12,8 @@
|
||||||
|
|
||||||
(define-generics preservable
|
(define-generics preservable
|
||||||
(->preserve preservable)
|
(->preserve preservable)
|
||||||
#:fast-defaults ([boolean? (define (->preserve preservable) preservable)]
|
#:fast-defaults ([void? (define (->preserve preservable) preservable)] ;; !
|
||||||
|
[boolean? (define (->preserve preservable) preservable)]
|
||||||
[number? (define (->preserve preservable) preservable)]
|
[number? (define (->preserve preservable) preservable)]
|
||||||
[string? (define (->preserve preservable) preservable)]
|
[string? (define (->preserve preservable) preservable)]
|
||||||
[bytes? (define (->preserve preservable) preservable)]
|
[bytes? (define (->preserve preservable) preservable)]
|
||||||
|
|
Loading…
Reference in New Issue