|
| From: | Zhu Zihao |
| Subject: | Re: Any convenient way for cl-generic to dispatch on a callable Lisp Object? |
| Date: | Mon, 20 Apr 2020 23:32:41 +0800 |
| User-agent: | Wanderlust/2.15.9 (Almost Unreal) SEMI-EPG/1.14.7 (Harue) FLIM/1.14.9 (Gojō) APEL/10.8 EasyPG/1.0.0 Emacs/27.0 (x86_64-pc-linux-gnu) MULE/6.0 (HANACHIRUSATO) |
Thanks for your reply.
I add a custom generalizer for funcall-able Lisp Object now
(cl-generic-define-generalizer rstream--callable-generalizer
51 (lambda (name &rest _)
`(when (functionp ,name)
'rstream-callable))
(lambda (tag &rest _)
(when (eq tag 'rstream-callable)
(list tag))))
(cl-defmethod cl-generic-generalizers ((_specializer (eql rstream-callable)))
"Support for `stream' specializers."
(list rstream--callable-generalizer))
| [Prev in Thread] | Current Thread | [Next in Thread] |