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 2615


Ignore:
Timestamp:
2015-06-20T01:51:47-07:00 (10 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/f4grobner/polynomial.lisp

    r2612 r2615  
    113113      (setf p (cdr p)))))
    114114
    115 (defmacro def-additive-operation-method (method-name &optional doc-string)
     115(defmacro def-additive-operation-method (method-name &optional (doc-string nil doc-string-supplied-p))
     116  "This macro avoids code duplication for two similar operations: ADD-TO and SUBTRACT-FROM."
    116117  `(defmethod ,method-name ((self poly) (other poly))
    117      ,doc-string
     118     ,@(when doc-string-supplied-p `(,doc-string))
    118119     (with-slots ((termlist1 termlist) (order1 order))
    119120         self
Note: See TracChangeset for help on using the changeset viewer.