- Timestamp:
- 2015-06-22T18:24:09-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/term.lisp
r3182 r3183 46 46 47 47 (defmethod print-object ((self term) stream) 48 #+nil 48 49 (with-accessors ((dimension monom-dimension) 49 50 (exponents monom-exponents) … … 54 55 exponents 55 56 coeff)) 56 (print-unreadable-object self stream :type t :identity t))57 (print-unreadable-object (self stream :type t :identity t))) 57 58 58 59 … … 96 97 (format t "Old: ~A~%" old) 97 98 (format t "Initargs: ~A~%" initargs) 98 (call-next-method ))99 (call-next-method :coeff 1)) 99 100 100 101
Note:
See TracChangeset
for help on using the changeset viewer.