[Openmcl-devel] apparent bug in FIND-METHOD with EQL specializers

[Eric Marsden]

Hi,

The following transcript illustrates what I believe is a bug in
FIND-METHOD when using EQL specializers. The dispatch code seems to
work; (foo :foo) returns the expected result.


,----
| Welcome to OpenMCL Version 1.1-pre-060720 (Beta: LinuxX8664)!
| ? (defgeneric foo (a))
| #<STANDARD-GENERIC-FUNCTION FOO #x300004BF854F>
| ? (defmethod foo ((a (eql :foo))) 42)
| #<STANDARD-METHOD FOO ((EQL :FOO))>
| ? (find-method #'foo nil '((eql :foo)))
| > Error: #<STANDARD-GENERIC-FUNCTION FOO #x300004BF854F> has no method for NIL ((EQL :FOO))
| > While executing: #<CCL::STANDARD-KERNEL-METHOD FIND-METHOD (STANDARD-GENERIC-FUNCTION T T)>, in process listener(1).
`----

-- 
Eric Marsden