[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Redefinition of print-object


May anybody please load the following lisp code into their CLISP:

================ snip snap ================
;;; print-object.lsp					15 Jul 94

(use-package 'clos)

(defclass C ()
  ((slot :initarg :slot :reader slot))

(defmethod print-object ((obj C) stream)
  (let ((*print-case* :downcase))
    (format stream "#<class ~S ~S>" (type-of req) (slot req))))

(print (lisp-implementation-version))
================ snip snap ================

At my installation, both the 1994-01-08 and the 1994-07-04 versions
produce the following warning:

    The generic function #<GENERIC-FUNCTION PRINT-OBJECT> is being modified, but has already been called.

I use the original interpreter.mem and did _not_ call #'print-object
before. I would like to know if this might be a problem with my

Thanks in advance for any responses,


Joachim Schrod			Email: schrod@iti.informatik.th-darmstadt.de
Computer Science Department
Technical University of Darmstadt, Germany