|
From: Nicolas N. <Nic...@iw...> - 2003-06-25 08:37:42
|
Raymond Toy <to...@rt...> writes:
> Which version of cmucl?
>
> I'll try to look into this. I have been hacking on matlisp a bit lately
> to see if I can get cmucl's PCL to generate better code. I may have
> messed up something.
>
> Ray
The definition
(defmethod fill-matrix ((matrix real-matrix) (fill real))
(copy! fill matrix))
does not work, because REAL is apparently shadowed somewhere:
;;; Describe real
REAL is an external symbol in the MATLISP package.
It names a class #<BUILT-IN-CLASS COMMON-LISP:REAL (sealed) {2806CA4D}>.
#<BUILT-IN-CLASS COMMON-LISP:REAL (sealed) {2806CA4D}> is a structure of type BUILT-IN-CLASS.
CLASS-INFO: #<TYPE-CLASS CLASS>.
ENUMERABLE: NIL.
NAME: COMMON-LISP:REAL.
LAYOUT: #<Layout for COMMON-LISP:REAL {2806CA7D}>.
STATE: :SEALED.
DIRECT-SUPERCLASSES: (#<BUILT-IN-CLASS NUMBER (sealed) {280185CD}>).
SUBCLASSES: #<EQ hash table, 8 entries {2806CAE5}>.
PCL-CLASS: #<Built-In-Class COMMON-LISP:REAL {28202FE5}>.
TRANSLATION: #<NUMERIC-TYPE COMMON-LISP:REAL>.
It names a PCL class #<Built-In-Class COMMON-LISP:REAL {28202FE5}>.
#<Built-In-Class COMMON-LISP:REAL {28202FE5}> is a class, it is an instance
of . (PCL:BUILT-IN-CLASS)
Its proper name is COMMON-LISP:REAL.
The direct superclasses are: (NUMBER), and the direct
subclasses are: (FLOAT RATIONAL). The class precedence list is:
(COMMON-LISP:REAL NUMBER KERNEL::GENERIC-NUMBER T)
There are 2 methods specialized for this class.
Its direct slots are:
Using common-lisp:real would work.
Nicolas.
|