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:24:09-07:00 (9 years ago)
Author:
Marek Rychlik
Message:

* empty log message *

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/f4grobner/term.lisp

    r3182 r3183  
    4646
    4747(defmethod print-object ((self term) stream)
     48  #+nil
    4849  (with-accessors ((dimension monom-dimension)
    4950                   (exponents monom-exponents)
     
    5455            exponents
    5556            coeff))
    56   (print-unreadable-object self stream :type t :identity t))
     57  (print-unreadable-object (self stream :type t :identity t)))
    5758   
    5859
     
    9697  (format t "Old: ~A~%" old)
    9798  (format t "Initargs: ~A~%" initargs)
    98   (call-next-method))
     99  (call-next-method :coeff 1))
    99100
    100101
Note: See TracChangeset for help on using the changeset viewer.