[Openmcl-devel] type specifier '(simple-vector n) in defmethod

Michał "phoe" Herda phoe at disroot.org
Tue Jan 2 03:17:21 PST 2024


No, standard CLOS dispatch happens only on classes.

Have you tried https://github.com/digikar99/polymorphic-functions ?

W dniu 2024-01-02 12:14, Taoufik Dachraoui napisał(a):

> Hi
> 
> I am trying to use '(simple-vector n) as type specifier in defmethod 
> but it is not possible, is there another way?
> 
> (typep #(1 2 3 4) '(simple-vector 4))
> 
> (defmethod mul ((n fixnum) (m1 (simple-vector n)) (m2 (simple-vector 
> n)))
> (let ((r (make-array (list n))))
> (dotimes (i n)
> (setf (svref r i) (* (svref m1 i) (svref m2 i))))
> r))
> Kind regards
> 
> Taoufik Dachraoui
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <https://lists.clozure.com/pipermail/openmcl-devel/attachments/20240102/fc84d839/attachment.htm>


More information about the Openmcl-devel mailing list