- Timestamp:
- 2015-06-18T20:13:44-07:00 (9 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
branches/f4grobner/term.lisp
r2335 r2339 48 48 (slot-value self 'coeff))) 49 49 50 #| 51 (defmethod initialize-instance ((self term) 52 &rest 53 args 54 &key 55 &allow-other-keys) 50 (defmethod shared-initialize ((self term) slot-names 51 &rest 52 initargs 53 &key 54 &allow-other-keys) 56 55 (format t "TERM::INITIALIZE-INSTANCE called with:~&ARGS: ~W.~%" args) 57 56 (call-next-method)) 58 |#59 57 60 58 #|
Note:
See TracChangeset
for help on using the changeset viewer.