Compare commits

..

1 commit

Author SHA256 Message Date
96a6a1ecbe
In the beginning there was fire 2024-09-30 02:38:46 +02:00

View file

@ -688,7 +688,7 @@ This is syntax used internally to make /define-object/ more readable.
(define-syntax define-object/add-slots! (define-syntax define-object/add-slots!
(syntax-rules () (syntax-rules ()
((_ o) ((_ o)
(void)) (values))
((_ o ((method-name . method-args) body ...) ((_ o ((method-name . method-args) body ...)
slots ...) slots ...)
(begin (begin