comparison base/classes.lisp @ 306:d70ff27b1968

add note about linked-events mixin Ignore-this: c5677560055960b06b1689b7a89f6d39 darcs-hash:20100404210537-16a00-7ca82f871410639d74103e352ecad60979a128c9.gz
author j.forth <j.forth@gold.ac.uk>
date Sun, 04 Apr 2010 22:05:37 +0100
parents 6be947d9e7c3
children be5cd4c5ecc2
comparison
equal deleted inserted replaced
305:39f5fc572953 306:d70ff27b1968
82 (:documentation "Notelike object")) 82 (:documentation "Notelike object"))
83 (defclass linked-event (amuse-object) 83 (defclass linked-event (amuse-object)
84 ((composition :reader composition 84 ((composition :reader composition
85 :writer %set-composition 85 :writer %set-composition
86 :initarg :composition)) 86 :initarg :composition))
87 (:documentation "This provides a composition slot for events.")) 87 (:documentation "This provides a composition slot for events. The
88 generic function initialize-instance can be specialized on an
89 implementation composition to assign the event slots when a
90 composition instance is created. Or the slot can be assigned within
91 the composition constructor function. FIXME: Not sure about this -
92 was there a good reason why events should not know the composition
93 they belong to? MTP-events have a slot for composition-id (an
94 integer number), but here the slot is intended to be assigned the
95 composition object itself. Doing this means that potentially some
96 generic functions could loose the extra composition parameter. I
97 made this change because of SIA projection related stuff, the only
98 function that relies on it in amuse is find-next-event. JF"))
99
88 (defclass pitched-event (event pitch) () 100 (defclass pitched-event (event pitch) ()
89 (:documentation "Event with pitch information")) 101 (:documentation "Event with pitch information"))
90 (defclass standard-pitched-event (pitched-event 102 (defclass standard-pitched-event (pitched-event
91 standard-anchored-period) () 103 standard-anchored-period) ()
92 (:documentation "Event with pitch information")) 104 (:documentation "Event with pitch information"))