From: Bruno H. <br...@cl...> - 2005-01-28 12:40:16
|
In science-fiction, a computer's answer to an unsolvable question is 42. In SBCL as well: * (sb-mop:class-prototype (find-class 'sequence)) 42 But there are also some classes which are not defined as abstract by ANSI CL and where SBCL nevertheless returns an object p = (sb-mop:class-prototype class) with (not (eq (class-of p) class)) : (#<STRUCTURE-CLASS STRUCTURE-OBJECT> #S(SB-PCL::DEAD-BEEF-STRUCTURE-OBJECT)) (#<BUILT-IN-CLASS CHARACTER> #\*) (#<BUILT-IN-CLASS SB-KERNEL:CODE-COMPONENT> 42) (#<BUILT-IN-CLASS SB-KERNEL:LRA> 42) (#<BUILT-IN-CLASS SB-KERNEL::RANDOM-CLASS> 42) (#<BUILT-IN-CLASS INTEGER> 42) (#<BUILT-IN-CLASS FLOAT> 42) (#<BUILT-IN-CLASS SIMPLE-STRING> 42) (#<BUILT-IN-CLASS STRING> 42) (#<BUILT-IN-CLASS VECTOR> 42) Bruno |