X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/aa14a4cddcb96b681d5c19a2ec8bad382f43b264..664b395170172c9541bb1ea1b87780a8d200fc19:/src/parser/streams-proto.lisp

diff --git a/src/parser/streams-proto.lisp b/src/parser/streams-proto.lisp
index bcce02a..d21b109 100644
--- a/src/parser/streams-proto.lisp
+++ b/src/parser/streams-proto.lisp
@@ -34,11 +34,11 @@
    "Returns the pathname of the file that STREAM is open on.
 
    If STREAM is open on a file, then return the pathname of that file.
-   Otherwise return NIL.")
+   Otherwise return nil.")
 
   ;; Provide some default methods.  Most streams don't have a pathname.
   ;; File-based streams provide a pathname, but it's usually been merged with
-  ;; *DEFAULT-PATHNAME-DEFAULTS* or some such, which has made it absolute,
+  ;; `*default-pathname-defaults*' or some such, which has made it absolute,
   ;; which isn't ideal.  We'll hack around this in more useful classes later.
   (:method ((stream stream)) nil)
   (:method ((stream file-stream)) (pathname stream)))