close Warning: Can't synchronize with repository "(default)" (The repository directory has changed, you should resynchronize the repository with: trac-admin $ENV repository resync '(default)'). Look in the Trac log for more information.

Changeset 3447 for branches


Ignore:
Timestamp:
2015-09-05T09:27:17-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/monom.lisp

    r3446 r3447  
    189189  self))
    190190
    191 (defgeneric monom-copy-instance (object &rest initargs &key &allow-other-keys)
    192   (:documentation "Returns a deep copy of OBJECT.")
     191(defmethod copy-instance :around (object &rest initargs &key &allow-other-keys)
     192  (:documentation "An :AROUND method of COPY-INSTANCE. It replaces
     193exponents with a fresh copy of the sequence.")
    193194  (:method ((object monom)  &rest initargs &key &allow-other-keys)
    194195    (declare (ignore object initargs))
Note: See TracChangeset for help on using the changeset viewer.