Fix indentation of PROG1.

nbtrap · Mar 1, 2014 · 22082fc · 22082fc
1 parent 544fcd1
commit 22082fc
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lexer.lisp b/lexer.lisp
@@ -718,7 +718,7 @@ when SUBPATTERN-REFERENCE is true) has already been read.  The closing
                           ;; put the digit back
                           (decf (lexer-pos lexer))
                           (prog1
-                            (list :subpattern-reference (get-number lexer :no-whitespace-p t))
+                              (list :subpattern-reference (get-number lexer :no-whitespace-p t))
                             (let ((next-char (next-char lexer)))
                               (when (or (null next-char)
                                         (not (char= (the character next-char) #\))))