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 2963


Ignore:
Timestamp:
2015-06-21T14:26:00-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/ring.lisp

    r2962 r2963  
    226226  (:method ((object cons) &rest initargs &key &allow-other-keys)
    227227    (declare (ignore initargs))
    228     (mapcar #'copy-instance object))
    229   (:method (object &rest initargs &key &allow-other-keys)
    230     (declare (ignore initargs))
    231     object))
     228    (mapcar #'copy-instance object)))
     229
    232230
    233231;; Source: http://stackoverflow.com/questions/11067899/is-there-a-generic-method-for-cloning-clos-objects
Note: See TracChangeset for help on using the changeset viewer.