src/method-{proto,impl}.lisp: Abstract out the receiver type.

[sod] / src / parser / scanner-impl.lisp

diff --git a/src/parser/scanner-impl.lisp b/src/parser/scanner-impl.lisp
index d856ba9..411cbc1 100644 (file)
--- a/src/parser/scanner-impl.lisp
+++ b/src/parser/scanner-impl.lisp
@@ -61,7 +61,8 @@
 (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))))))