src/parser/parser-proto.lisp: Fix bogus indentation.

diff --git a/src/parser/parser-proto.lisp b/src/parser/parser-proto.lisp
index 979a2a5..f7b5993 100644 (file)
--- a/src/parser/parser-proto.lisp
+++ b/src/parser/parser-proto.lisp
@@ -923,14 +923,14 @@
                                                       (not peekp)
                                                       `(not ,peekp))))
                       (step (parser-step context)))
-                     (cond ((not (constantp peekp))
-                            `(multiple-value-prog1 ,result
-                               (unless ,peekp ,step)))
-                           (peekp
-                            result)
-                           (t
-                            `(multiple-value-prog1 ,result
-                               ,step))))
+                 (cond ((not (constantp peekp))
+                        `(multiple-value-prog1 ,result
+                           (unless ,peekp ,step)))
+                       (peekp
+                        result)
+                       (t
+                        `(multiple-value-prog1 ,result
+                           ,step))))
               (values (list ,(if valuep `(list ,type ,value) type))
                       nil nil)))))))