# HG changeset patch # User Jamie Forth # Date 1298546598 0 # Node ID e5ff7d53f08456f094df73ebf14b22afacbb64e9 # Parent 2b31a375701bac834e6086bccfc1a0e7ec44077b Add :initform nil to linked-event composition slot. diff -r 2b31a375701b -r e5ff7d53f084 base/classes.lisp --- 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