* stream.c (put_strings, put_lines): New functions.

(stream_init): Registered new functions as intrinsics.

* stream.h (put_strings, put_lines): Declared.

* txr.1: Documented.

1 files changed, 2 insertions, 0 deletions

diff --git a/stream.h b/stream.h
index dee60cb8..4b7b2fe5 100644
--- a/stream.h
+++ b/stream.h
@@ -92,6 +92,8 @@ val put_string(val string, val stream);
 val put_line(val string, val stream);
 val put_char(val ch, val stream);
 val put_byte(val byte, val stream);
+val put_strings(val strings, val stream);
+val put_lines(val lines, val stream);
 val flush_stream(val stream);
 val seek_stream(val stream, val offset, val whence);
 val get_string(val stream, val nchars);