- Timestamp:
- 2016-05-27T17:56:30-07:00 (8 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/polynomial.lisp
r3741 r3747 261 261 (- self other))) 262 262 263 (def macro def-add/subtract-method (add/subtract-method-name263 (define-compiler-macro def-add/subtract-method (add/subtract-method-name 264 264 uminus-method-name 265 265 &optional … … 275 275 #',add/subtract-method-name 276 276 ,(when uminus-method-name `(function ,uminus-method-name)))) 277 277 self)) 278 278 279 279 (eval-when (:compile-toplevel :load-toplevel :execute)
Note:
See TracChangeset
for help on using the changeset viewer.