X-Git-Url: https://git.distorted.org.uk/~mdw/sod/blobdiff_plain/aa14a4cddcb96b681d5c19a2ec8bad382f43b264..e046c3f65a8f7241889fb9b6005aac21e2aad1a8:/src/parser/streams-proto.lisp diff --git a/src/parser/streams-proto.lisp b/src/parser/streams-proto.lisp index bcce02a..d8da6fa 100644 --- a/src/parser/streams-proto.lisp +++ b/src/parser/streams-proto.lisp @@ -7,7 +7,7 @@ ;;;----- Licensing notice --------------------------------------------------- ;;; -;;; This file is part of the Sensble Object Design, an object system for C. +;;; This file is part of the Sensible Object Design, an object system for C. ;;; ;;; SOD is free software; you can redistribute it and/or modify ;;; it under the terms of the GNU General Public License as published by @@ -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)))