I'm trying to define a print method for my class, and I'm getting "Error: The function PRINT is defined as something other than a generic function."<br><br>Below shows the two commands that when issues, reproduce this on Linux x86_64.  What should I try instead?<br>
<br>Apologies if this is obvious. I'm new to CLOS, and these classes are auto- generated by SWIG as wrappers for C++ classes.<br><br>Jason<br><br>jaten@afarm:~/dj/ldc2swig$ ccl -n<br>Welcome to Clozure Common Lisp Version 1.7-dev-r14684M-trunk  (LinuxX8664)!<br>
? (cl:defclass object()<br>  ((ff-pointer :reader ff-pointer)))<br><br>#<STANDARD-CLASS OBJECT><br>? (cl:defmethod print ((self object))<br>  (Object_dprint (ff-pointer self)))<br><br>;Compiler warnings :                                                                                                                                                             <br>
;   In (PRINT (OBJECT)) inside an anonymous lambda form: Undefined function OBJECT_DPRINT                                                                                        <br><br>> Error: The function PRINT is defined as something other than a generic function.<br>
<br><br>> While executing: ENSURE-GENERIC-FUNCTION, in process listener(1).<br>> Type :GO to continue, :POP to abort, :R for a list of available restarts.<br>> If continued: Try to remove any global non-generic function or macro definition.<br>
> Type :? for other options.<br><br><br>1 > :b<br> (7FB61B6E6A10) : 0 (ENSURE-GENERIC-FUNCTION PRINT) 341<br> (7FB61B6E6A40) : 1 (ENSURE-METHOD PRINT (#<STANDARD-CLASS OBJECT>) :FUNCTION #<Compiled Method-function (PRINT #) (Non-Global)  #x30200056D4BF> :QUALIFIERS NIL :LAMBDA-LIST (S\<br>
ELF)) 285<br> (7FB61B6E6AA8) : 2 (FUNCALL #'#<Anonymous Function #x3020005682BF>) 157<br> (7FB61B6E6AB8) : 3 (TOPLEVEL-EVAL (DEFMETHOD PRINT (#) (OBJECT_DPRINT #)) NIL) 709<br> (7FB61B6E6B60) : 4 (READ-LOOP :INPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x30200055A9ED> :OUTPUT-STREAM #<SYNONYM-STREAM to *TERMINAL-IO* #x30200055A63D> :BREAK-LEVEL 0 :\<br>
PROMPT-FUNCTION #<Compiled-function (:INTERNAL CCL::READ-LOOP) (Non-Global)  #x30000059B38F>) 2317<br> (7FB61B6E6DC0) : 5 (TOPLEVEL-LOOP) 109<br> (7FB61B6E6DF0) : 6 (FUNCALL #'#<(:INTERNAL (TOPLEVEL-FUNCTION (CCL::LISP-DEVELOPMENT-SYSTEM T)))>) 117<br>
 (7FB61B6E6E10) : 7 (FUNCALL #'#<(:INTERNAL CCL::MAKE-MCL-LISTENER-PROCESS)>) 741<br> (7FB61B6E6EB0) : 8 (RUN-PROCESS-INITIAL-FORM #<TTY-LISTENER listener(1) [Active] #x30200055776D> (#<COMPILED-LEXICAL-CLOSURE # #x302000556E8F>)) 717<br>
 (7FB61B6E6F48) : 9 (FUNCALL #'#<(:INTERNAL (CCL::%PROCESS-PRESET-INTERNAL (PROCESS)))> #<TTY-LISTENER listener(1) [Active] #x30200055776D> (#<COMPILED-LEXICAL-CLOSURE # #x3020\<br>00556E8F>)) 389<br>
 (7FB61B6E6F98) : 10 (FUNCALL #'#<(:INTERNAL CCL::THREAD-MAKE-STARTUP-FUNCTION)>) 301<br>1 ><br><br>