j@287: (cl:in-package #:amuse-database-admin)
j@287: 
j@287: (defgeneric make-composition-identifier (package composition-id))
j@309: 
j@309: 
j@309: ;;;====================================================================
j@309: ;;; Generic functions for querying the database
j@309: ;;;
j@309: ;;; FIXME: how sane is this? The idea was to have a general mtp-admin.
j@309: ;;;
j@309: ;;; What about arbitrary SQL conditions? Might be useful for general
j@309: ;;; searching, and defining new datasets (which I currently do by
j@309: ;;; writing the resuls of a SQL query to a file (e.g. `all the Beatles
j@309: ;;; songs'), and then reading the file into lisp). Amuse-midi-db
j@309: ;;; implements these methods.
j@309: ;;;
j@309: ;;; Also, should this kind of generality be extended to data import
j@309: ;;; and export?
j@309: ;;; =====================================================================
j@309: 
j@309: (defgeneric list-collections (package-object &key compositions stream))
j@309: 
j@309: (defgeneric list-compositions (package-object &key
j@309: 					      collection-identifier stream))