master: Remove effectless case
snuglas via Sbcl-commits <[email protected]>
| Newsgroups | gmane.lisp.steel-bank.cvs |
|---|---|
| Message-ID | <[email protected]> |
The branch "master" has been updated in SBCL:
via f7d9205bfd9fefeeafbc683cadb3f86130dc22a9 (commit)
from bc1ea6852e64973b09a4f394d354646c298f8531 (commit)
- Log -----------------------------------------------------------------
commit f7d9205bfd9fefeeafbc683cadb3f86130dc22a9
Author: Douglas Katzman <[email protected]>
Date: Wed Aug 12 19:31:37 2026 +0000
Remove effectless case
This looks like a typo from rev 671e23e5 but surprisingly was syntactically ok,
hence no compiler complaint. EQ was parsed as the head of a clause.
---
src/compiler/knownfun.lisp | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/src/compiler/knownfun.lisp b/src/compiler/knownfun.lisp
index 3f6716da6..705068bd0 100644
--- a/src/compiler/knownfun.lisp
+++ b/src/compiler/knownfun.lisp
@@ -75,7 +75,7 @@
(info (fun-info-or-lose name))
(transforms (fun-info-transforms info))
(old (find-if (lambda (transform)
- (and (case important (eq important :vop)
+ (and (case important
(:vop
(typep transform 'vop-transform))
(:before-vop
-----------------------------------------------------------------------
hooks/post-receive
--
SBCL