Mercurial > hg > amuse
comparison base/classes.lisp @ 217:d8f650e3796e
Rationalise base and geerdes classes, constructors and methods.
Ignore-this: d9d4d88566a6d110844d91d4c70513cd
Towards a more standardised interface. Some of these changes (generalised
constructors and reader functions) are necessary for amuse-database-admin
functionality and some other CHARM-like things.
darcs-hash:20090716154406-16a00-8a9b4fb1fc1f5ba75af66a1bbd87e1bb68e02493.gz
committer: Jamie Forth <j.forth@gold.ac.uk>
author | j.forth <j.forth@gold.ac.uk> |
---|---|
date | Thu, 24 Feb 2011 11:23:18 +0000 |
parents | 328114b61465 |
children | ead979ad3b28 |
comparison
equal
deleted
inserted
replaced
216:e1842efb1dd4 | 217:d8f650e3796e |
---|---|
6 | 6 |
7 ;; types of information-specifiers | 7 ;; types of information-specifiers |
8 | 8 |
9 (defclass identifier (amuse-object) () | 9 (defclass identifier (amuse-object) () |
10 (:documentation "DEPRECATED: Base class to allow specification of | 10 (:documentation "DEPRECATED: Base class to allow specification of |
11 composition to get. Must be subclassed.")) | 11 composition to get. Must be subclassed.")) ; FIXME: Why deprecated? |
12 | 12 |
13 (defclass constituent-identifier (identifier) () | 13 (defclass constituent-identifier (identifier) () |
14 (:documentation "Base class to allow specifiction of constituents")) | 14 (:documentation "Base class to allow specification of |
15 constituents")) | |
16 | |
15 (defclass composition-identifier (constituent-identifier) () | 17 (defclass composition-identifier (constituent-identifier) () |
16 (:documentation "Base class to allow-specification of constituents")) | 18 (:documentation "Base class to allow specification of |
19 compositions constituents")) | |
20 | |
21 (defclass event-identifier (identifier) () | |
22 (:documentation "Base class to allow specification of events.")) | |
17 | 23 |
18 (defclass moment (amuse-object) () | 24 (defclass moment (amuse-object) () |
19 (:documentation "Object indicating a point in time")) | 25 (:documentation "Object indicating a point in time")) |
20 (defclass period (amuse-object) () | 26 (defclass period (amuse-object) () |
21 (:documentation "Object indicating a region of time")) | 27 (:documentation "Object indicating a region of time")) |