Mercurial > hg > amuse
diff base/classes.lisp @ 248:e5ff7d53f084
Add :initform nil to linked-event composition slot.
author | Jamie Forth <j.forth@gold.ac.uk> |
---|---|
date | Thu, 24 Feb 2011 11:23:18 +0000 |
parents | 25b6b52eb770 |
children |
line wrap: on
line diff
--- a/base/classes.lisp Thu Feb 24 11:23:18 2011 +0000 +++ b/base/classes.lisp Thu Feb 24 11:23:18 2011 +0000 @@ -84,7 +84,8 @@ (defclass linked-event (amuse-object) ((composition :reader composition :writer %set-composition - :initarg :composition)) + :initarg :composition + :initform nil)) (:documentation "This provides a composition slot for events. The generic function initialize-instance can be specialized on an implementation composition to assign the event slots when a