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.

Ignore:
Timestamp:
2015-06-22T18:33:46-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/term.lisp

    r3190 r3191  
    8080
    8181(defmethod update-instance-for-different-class ((old monom) (new  scalar)
    82                                                 &rest
    83                                                   initargs
    8482                                                &key
     83                                                  (coeff 1)
    8584                                                  &allow-other-keys)
    8685  (format t "UPDATE-INSTANCE-FOR-DIFFERENT-CLASS MONOM->SCALAR called.%")
    8786  (format t "Old: ~A~%" old)
    8887  (format t "Initargs: ~A~%" initargs)
    89   (apply #'call-next-method (list old new :coeff 1 initargs)))
     88  (call-next-method)))
    9089
    9190#|
Note: See TracChangeset for help on using the changeset viewer.