Commit 7f87443a authored by Zach Beane's avatar Zach Beane
Browse files

Flesh out INPUT-HANDLE, OUTPUT-HANDLE slots a little more.

parent 6a351fe8
...@@ -253,7 +253,10 @@ values otherwise." ...@@ -253,7 +253,10 @@ values otherwise."
(defclass excl:single-channel-simple-stream (fundamental-stream) (defclass excl:single-channel-simple-stream (fundamental-stream)
((excl::buffer ((excl::buffer
:initform (make-array 1024 :element-type '(unsigned-byte 8))) :initform (make-array 1024 :element-type '(unsigned-byte 8)))
(excl::output-handle) (excl::output-handle
:initarg :output-handle)
:initarg :input-handle)
(excl::buffer-ptr) (excl::buffer-ptr)
(excl::control-out) (excl::control-out)
(external-format (external-format
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment