Mercurial > hg > amuse
view implementations/midi-db/examples/example.lisp @ 240:c454b4fc9aad
Add generic ID constructor to midi-db.
Ignore-this: 91554466a43d64ee99fbf840985d7c6b
darcs-hash:20100414185257-16a00-dcfa03eaa450cfdce842c64c3f49214c5c938181.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 | a5d065905f6d |
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)))