position-aware-stream-line position-aware-stream-column))
(defclass position-aware-stream (proxy-stream)
((file :initarg :file :initform nil
position-aware-stream-line position-aware-stream-column))
(defclass position-aware-stream (proxy-stream)
((file :initarg :file :initform nil
(line :initarg :line :initform 1
:type fixnum :accessor position-aware-stream-line)
(column :initarg :column :initform 0
(line :initarg :line :initform 1
:type fixnum :accessor position-aware-stream-line)
(column :initarg :column :initform 0