- Timestamp:
- 2015-06-21T15:06:03-07:00 (10 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/term.lisp
r2984 r2985 75 75 (setf (slot-value self 'coeff) coeff))))) 76 76 77 (defmethod update-instance-for-different-class ((old monom) (new term) &key)77 (defmethod update-instance-for-different-class :after ((old monom) (new term) &key) 78 78 ;; Changing an instance of class MONOM to class TERM may also 79 79 ;; happen when OLD is an instance of TERM, in which case the 80 80 ;; value of the coefficient should be preserved. 81 (call-next-method)82 81 (format t "Called!!! New: ~A, Old: ~A.~%" new old) 83 82 (unless (slot-boundp new 'coeff)
Note:
See TracChangeset
for help on using the changeset viewer.