Mercurial > hg > amuse
view implementations/midi-db/examples/example.lisp @ 314:937334f2bcd2
Add generic ID constructor to midi-db.
Ignore-this: 91554466a43d64ee99fbf840985d7c6b
darcs-hash:20100414185257-16a00-dcfa03eaa450cfdce842c64c3f49214c5c938181.gz
author | j.forth <j.forth@gold.ac.uk> |
---|---|
date | Wed, 14 Apr 2010 19:52:57 +0100 |
parents | f99fd6a7bbfc |
children | 6a3adca16910 |
line wrap: on
line source
(cl:in-package #:amuse-midi-db) (connect-to-database :database-name "amuse") (list-collections *package*) (list-compositions *package*) ; FIXME: is it a good idea for this to ; be general or not? (list-collections *package* :compositions t) ; list both collections ; and compositions (defparameter *composition* (get-composition (make-midi-db-composition-identifier 1)))