X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/f5992dc3304d7d0b79eee741524980739e35aa2f..refs/heads/master:/src/parser/scanner-impl.lisp

diff --git a/src/parser/scanner-impl.lisp b/src/parser/scanner-impl.lisp
index d856ba9..411cbc1 100644
--- a/src/parser/scanner-impl.lisp
+++ b/src/parser/scanner-impl.lisp
@@ -61,7 +61,8 @@ (defmethod stream-peek-char ((stream character-scanner-stream))
 (export '(string-scanner make-string-scanner string-scanner-p))
 (defstruct (string-scanner
 	     (:constructor make-string-scanner
-		 (string &key (start 0) end filename
+		 (string
+		  &key (start 0) end filename
 		  &aux (%string string)
 		       (index start)
 		       (limit (or end (length string))))))