j@251: (cl:in-package #:amuse-datasets)
j@251: 
j@251: (defclass file-dataset-identifier (dataset-identifier) ()
j@251:   (:documentation "Abstract class for file-based dataset
j@251:   identifiers."))
j@251: 
j@251: (defclass midifile-dataset-identifier (file-dataset-identifier)
j@251:   ((dataset-path :reader dataset-path
j@251: 	     :initarg :dataset-path)
j@251:    (implementation-package :reader implementation-package
j@251: 	    :initarg :implementation-package))
j@251:   (:documentation "Identifier for dataset of midifiles stored in a
j@251:   directory."))
j@251: 
j@251: (defclass file-dataset (dataset) ()
j@251:   (:documentation "Abstract class for file-based datasets."))
j@251: 
j@251: (defclass midifile-dataset (file-dataset)
j@251:   ((identifier :initarg :identifier
j@251: 	       :reader identifier)
j@251:    (description :initarg :description
j@251: 		:initform nil
j@251: 		:reader description))
j@251:   (:documentation "A dataset of midifiles stored in a directory."))