Re: subtypep?

["Peter N. Saurugger" <peter-s@molbio.cbs.umn.edu>]

It's not only subtypep, but also type-of doesn't behave as described
e.g. in S.Keene 's book. Since she must have had a working version of
the language, I wonder which version it is (was). I am using the rainy
day PCL as supplied with ALlegro CL (on a SparcStation).

Some anonymous "iwmc-class"  is returned for all PCL objects instead of 
their proper class type:

        (defclass foo () ())
        (defclass bar (foo) ())

        (subtypep 'foo 'bar)
        nil nil

	(type-of 'bar)
	symbol

	(type-of (class-of 'bar))
	iwmc-class

	(setq *bar* (make-instance 'bar))
	#<bar 62006726>

	(type-of *bar*)
	iwmc-class

	(class-of *bar*)
	#<Standard-Class bar 61540306>

	(type-of (class-of *bar*))
	iwmc-class
	

Peter Norbert Saurugger
MBCC, UofMN