X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/sod/blobdiff_plain/d2f1db725b33c0cc55b3eca0744c2a76adf315e9..refs/heads/mdw/progfmt:/src/parser/streams-proto.lisp diff --git a/src/parser/streams-proto.lisp b/src/parser/streams-proto.lisp index b48a67e..014ed70 100644 --- a/src/parser/streams-proto.lisp +++ b/src/parser/streams-proto.lisp @@ -57,7 +57,8 @@ (defgeneric stream-line-and-column (stream) ;;; Enhanced stream classes. (export '(position-aware-stream - position-aware-stream-line position-aware-stream-column)) + position-aware-stream-file position-aware-stream-line + position-aware-stream-column)) (defclass position-aware-stream (proxy-stream) ((file :initarg :file :initform nil :type (or pathname null) :accessor position-aware-stream-file)