changeset 122:997bed70ef28

More documentation

darcs-hash:20070727174737-f76cc-47d85624f415f602bd6ae7a4d5d69f46e51c52ed.gz

--- a/base/classes.lisp	Fri Jul 27 15:21:54 2007 +0100
+++ b/base/classes.lisp	Fri Jul 27 18:47:37 2007 +0100
@@ -65,10 +65,16 @@
 
 ;; events
 
-(defclass event (anchored-period) ())
-(defclass pitched-event (event pitch-designator) ())
-(defclass chromatic-pitched-event (pitched-event chromatic-pitch) ())
-(defclass percussive-event (event) ())
+(defclass event (anchored-period) ()
+  (:documentation "Notelike object"))
+(defclass pitched-event (event pitch-designator) ()
+  (:documentation "Event with pitch information"))
+(defclass chromatic-pitched-event (pitched-event chromatic-pitch) ()
+  (:documentation "Event with chromatic pitch information"))
+(defclass percussive-event (event) ()
+  (:documentation "Unpitched percussion Event. Is there a reason why
+this is unpitched necessarily, or why I'm not counting piano, etc in
+this? Perhaps what I mean is that it should be renamed?"))
 
 ;;; Range-based `constituents'
 ;; Whilst these are all constituents in the CHARM sense, their