X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/6e2d4b5250ecf9cf82fcb7c5c76bdebca230150b..e82044bca1b6cfe495de93abbff727a5b41359b8:/src/output-proto.lisp

diff --git a/src/output-proto.lisp b/src/output-proto.lisp
index 65068f3..a87c7c0 100644
--- a/src/output-proto.lisp
+++ b/src/output-proto.lisp
@@ -41,8 +41,7 @@
 
 (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