chiark / gitweb /
src/class-finalize-impl.lisp (check-sod-class): Remove `w/del' wrapper.
[sod] / src / parser / streams-impl.lisp
index 33015a0b648abcfa32229fa2ffbc0e79e398d39a..378f9a80d1c0d45a8847731e38c8106d9ef463d1 100644 (file)
@@ -214,7 +214,7 @@ (export '(position-aware-stream
          position-aware-stream-line position-aware-stream-column))
 (defclass position-aware-stream (proxy-stream)
   ((file :initarg :file :initform nil
-        :type pathname :accessor position-aware-stream-file)
+        :type (or pathname null) :accessor position-aware-stream-file)
    (line :initarg :line :initform 1
         :type fixnum :accessor position-aware-stream-line)
    (column :initarg :column :initform 0