Mercurial > hg > amuse
comparison base/classes.lisp @ 89:0b4c624910f1
base/: basic protocol for accessing monodies
darcs-hash:20070723140651-c0ce4-2c828ea984eb92f0ccb73866a6a496131c8fa736.gz
| author | Marcus Pearce <m.pearce@gold.ac.uk> |
|---|---|
| date | Mon, 23 Jul 2007 15:06:51 +0100 |
| parents | 8ea75cc8bc2c |
| children | ad9cca28fecf |
comparison
equal
deleted
inserted
replaced
| 88:8ea75cc8bc2c | 89:0b4c624910f1 |
|---|---|
| 6 (defclass time-ordered-constituent (constituent list-slot-sequence) | 6 (defclass time-ordered-constituent (constituent list-slot-sequence) |
| 7 ;; this won't work if lisp implementation doesn't support extensible | 7 ;; this won't work if lisp implementation doesn't support extensible |
| 8 ;; sequences. | 8 ;; sequences. |
| 9 ()) | 9 ()) |
| 10 (defclass composition (time-ordered-constituent) ()) | 10 (defclass composition (time-ordered-constituent) ()) |
| 11 (defclass monody (time-ordered-constituent) ()) | 11 (defclass monody (composition) ()) |
| 12 | 12 |
| 13 ;; types of information-specifiers | 13 ;; types of information-specifiers |
| 14 | 14 |
| 15 (defclass identifier () ()) ;; for composition specification | 15 (defclass identifier () ()) ;; for composition specification |
| 16 (defclass moment-designator () ()) | 16 (defclass moment-designator () ()) |