1 files changed, 1 insertions(+), 1 deletions(-)

M tests/bare-tests.lisp

@@ 12,7 12,7 @@
               (ok (write-binary obj out))))))
      (testing (concatenate 'string "reading " (symbol-name ',type))
        (multiple-value-bind (int bytes-read) (read-binary ',type in)
-         (with-slots (value)int
+         (with-slots (value) int
            ,(cond
               ((= (length result) 3)
                ;; If we want a specific form evaluated