X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/a1985b3cf0ca42f573b8599ec50a0f162a26c314..refs/heads/master:/src/parser/scanner-proto.lisp diff --git a/src/parser/scanner-proto.lisp b/src/parser/scanner-proto.lisp index a1ded51..aed4c9f 100644 --- a/src/parser/scanner-proto.lisp +++ b/src/parser/scanner-proto.lisp @@ -157,6 +157,7 @@ (:documentation "Return the SCANNER's current column number.") (:method (scanner) nil)) +(export 'scanner-file-location) (defun scanner-file-location (scanner) "Capture the current location of the SCANNER.