[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Guile-commits] branch main updated: Bugfix: Recursively use method*, no
From: |
Mikael Djurfeldt |
Subject: |
[Guile-commits] branch main updated: Bugfix: Recursively use method*, not method, in method* |
Date: |
Wed, 27 Nov 2024 07:30:22 -0500 |
This is an automated email from the git hooks/post-receive script.
mdj pushed a commit to branch main
in repository guile.
The following commit(s) were added to refs/heads/main by this push:
new 382d89002 Bugfix: Recursively use method*, not method, in method*
382d89002 is described below
commit 382d890026aee242de25817de87b2c405eed63db
Author: Mikael Djurfeldt <mikael@djurfeldt.com>
AuthorDate: Wed Nov 27 13:27:46 2024 +0100
Bugfix: Recursively use method*, not method, in method*
* module/oop/goops.scm (method*): Do not use method.
---
module/oop/goops.scm | 9 ++++-----
1 file changed, 4 insertions(+), 5 deletions(-)
diff --git a/module/oop/goops.scm b/module/oop/goops.scm
index 1938235d8..5b1f7978b 100644
--- a/module/oop/goops.scm
+++ b/module/oop/goops.scm
@@ -2073,10 +2073,9 @@ function."
;;; eliminated. Note also that it doesn't support the (next-method) call
;;; as does the following implementation.
;;;
-;;; If you make changes to the following implementation, bear in mind
-;;; that define-method* is supposed to also be able to handle ordinary
-;;; methods without keyword formals. See the Guile Reference and the
-;;; module (oop goops keyword-formals).
+;;; If you make changes, bear in mind that define-method* is supposed to
+;;; also be able to handle ordinary methods without keyword formals. See
+;;; the Guile Reference and the module (oop goops keyword-formals).
;;;
(define-syntax define-method
@@ -2369,7 +2368,7 @@ function."
(define-syntax method*
(lambda (x)
(syntax-case x ()
- ((_ formals) #'(method formals (if #f #f)))
+ ((_ formals) #'(method* formals (if #f #f)))
((_ formals body0 body1 ...)
(with-syntax (((formals (specializer ...) keyword-formals)
(parse-keyword-formals #'formals)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Guile-commits] branch main updated: Bugfix: Recursively use method*, not method, in method*,
Mikael Djurfeldt <=