feature? bug?

[Andrew Philpot <philpot@ptolemy.arc.nasa.GOV>]

I am having problems with :AROUND methods placed on argument lists
which are completely unspecialized, i.e., whose class is T.

This is the simplest case in which I detect this behavior.  It doesn't
seem to happen when you make this a method on some other built-in
class like SYMBOL.  It also doesn't happen unless there are both
primary and arounds of the same name both on class T.

;; begin code

(use-package :pcl)

(defmethod try ((thing t)) nil)

(defmethod try :around ((thing t)) nil)

;;; end code

When you then execute

(try t)

you get an error:

Error: No matching method for the generic-function #<Function METHOD-FUNCTION @ #x4e02b9>,
when called with arguments (NIL).

Backtrace at this point reveals:


 ->(ERROR "No matching method for the generic-function ~S,~@
          when called with arguments ~S." #<Function METHOD-FUNCTION @ #x4e02b9> ...)
   (ERROR "No matching method for the generic-function ~S,~@
          when called with arguments ~S." #<Function METHOD-FUNCTION @ #x4e02b9> ...)
   (NO-APPLICABLE-METHOD #<Function METHOD-FUNCTION @ #x4e02b9> NIL)
   (METHOD-FUNCTION NIL)
   (#:|..$RANDOM-FORMS$.a9df4d10.a9df4d11| (CALL-METHOD NIL NIL) :EVAL ...)
   (SIMPLE-CODE-WALKER (CALL-METHOD NIL NIL) NIL ...)
   (#:|.$RANDOM-FORMS$.a9df4d10| (CALL-METHOD NIL NIL))
   (MAKE-EFFECTIVE-METHOD-FUNCTION #<Function TRY @ #xb4bec1> (CALL-METHOD NIL NIL))

... more older frames ...

I have been through the most recent "cloops.text" archive and have
just subscribed to the mailing list.

Thanks for any assistance.

Andrew

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

PCL information:

PCL system date: 5/22/89  Victoria Day PCL
Lisp Implementation type: Allegro CL
Lisp Implementation version: 3.1.13 [Sun3] (4/24/90)
*features*: (:LOOP LOOP :COMPOSER :FAKE-ACTIVE-REGIONS :PCL :CLOS
:BIG-ENDIAN :GSGC :M68881 :M68020 :ALLEGRO-V3.1 :FRANZ-INC :EXCL
:ALLEGRO :COMMON-LISP :CONFORMING-IEEE :IEEE :FLAVORS :SUNOS4.0 :SUN
:M68K :SUN3 :UNIX :NASA-RIA :MULTIPROCESSING :CLX :XLIB :CLX-MIT-R4
:CLX-CL-ERROR :CW-X)


Andrew Philpot                       philpot@ptolemy.arc.nasa.gov
*****************************************************************
* "The use of Cobol cripples the mind: its teaching, therefore, *
* should be regarded as a criminal offense."      - Dijkstra    *
*****************************************************************