M: output-stream stream-seekable? drop f ; inline
M: output-stream stream-length drop f ; inline
+M: f stream-read1 drop f ; inline
+M: f stream-read-unsafe 3drop 0 ; inline
+M: f stream-read-until 2drop f f ; inline
+M: f stream-read-partial-unsafe 3drop 0 ; inline
+M: f stream-readln drop f ; inline
+M: f stream-contents drop f ; inline
+
+M: f stream-write1 2drop ; inline
+M: f stream-write 2drop ; inline
+M: f stream-flush drop ; inline
+M: f stream-nl drop ; inline
+