DESCRIBE shows an incorrect method signature.

[SATO shinichi]

The minimum session is below.

* (defmethod test ((a (eql :hoge))) a)

#<STANDARD-METHOD COMMON-LISP-USER::TEST ((EQL :HOGE)) {1003761AE3}>
* (describe 'test)

COMMON-LISP-USER::TEST
  [symbol]

TEST names a generic function:
  Lambda-list: (A)
  Derived type: (FUNCTION (T) *)
  Method-combination: STANDARD
  Methods:
    (TEST ((EQL HOGE))) ; <--- should be printed as keyword. (i.e. :HOGE.)