(typep (find-package :cl) 'structure-object)

Hi,

SBCL, CMUCL and ACL seem to implement packages as structures, and this
implementation detail leaks through as can be witnessed by

  (typep (find-package :cl) 'structure-object)

evaluating to T.

CLHS specifies the class precedence list for packages to be

  package, t

so I think -- please correct me if I'm wrong -- that the above form must
conformingly return NIL.

  -T.


-------------------------------------------------------------------------
This SF.net email is sponsored by: Microsoft
Defy all challenges. Microsoft(R) Visual Studio 2008.
http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/