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 4060


Ignore:
Timestamp:
2016-05-31T18:25:23-07:00 (8 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed

  • branches/f4grobner/polynomial.lisp

    r4059 r4060  
    683683
    684684(defgeneric poly-nreverse (self)
    685   (:documentation "Reverse the order of terms in a polynomial SELF.")
     685  (:documentation "Destructively reverse the order of terms in a polynomial SELF.")
    686686  (:method ((self poly))
    687687    (with-slots (termlist)
    688688        self
    689       (nreverse termlist))
     689      (setf termlist (nreverse termlist)))
    690690    self))
    691691
Note: See TracChangeset for help on using the changeset viewer.