view base/datasets/datasets-file/classes.lisp @ 251:6a3adca16910

Refactor dataset stuff out of amuse-database-admin, and add midifile-dataset.

(cl:in-package #:amuse-datasets)

(defclass file-dataset-identifier (dataset-identifier) ()
  (:documentation "Abstract class for file-based dataset
  identifiers."))

(defclass midifile-dataset-identifier (file-dataset-identifier)
  ((dataset-path :reader dataset-path
	     :initarg :dataset-path)
   (implementation-package :reader implementation-package
	    :initarg :implementation-package))
  (:documentation "Identifier for dataset of midifiles stored in a
  directory."))

(defclass file-dataset (dataset) ()
  (:documentation "Abstract class for file-based datasets."))

(defclass midifile-dataset (file-dataset)
  ((identifier :initarg :identifier
	       :reader identifier)
   (description :initarg :description
		:initform nil
		:reader description))
  (:documentation "A dataset of midifiles stored in a directory."))