Incorrect unparse for (defclass foo () ((s :initform i)))

[robert-strandh]

Using the LIST builder, parsing and unparsing (defclass foo () ((s :initform i)))
results in (defclass foo nil ((s (:initform i)))) with an extra list level around
(:initform i)