(export '(sequencer sequencer-constraints sequencer-table))
(defclass sequencer ()
- ((constraints :initarg :constraints :initform nil
- :type list :accessor sequencer-constraints)
+ ((constraints :initform nil :type list :accessor sequencer-constraints)
(table :initform (make-hash-table :test #'equal)
:reader sequencer-table))
(:documentation