Implementing truncate-stream.

* configure: Test for ftruncate and chsize.

* stream.c (unimpl_truncate): New static function.
(fill_stream_ops): Default the truncate operation to unimpl_truncate.
(null_ops): Initialize truncate to unimpl_truncate.
(stdio_truncate): New static function.
(stdio_ops, tail_ops): Initialize truncate to stdio_truncate.
(pipe_ops, dir_ops, string_ops, byte_in_ops, string_out_ops,
strlist_out_ops, cat_stream_ops): Initialize truncate to null,
so it gets defaulted by fill_stream_ops.
(truncate_stream): New function.
(stream_init): Register truncate-stream intrinsic.

* stream.h (struct strm_ops): New member, truncate.
(strm_ops_init): New truncate argument added to macro.
(truncate_stream): Declared.

*syslog.c (syslog_strm_ops): Initialize truncate to null.

* txr.1: Documented.

1 files changed, 1 insertions, 1 deletions

diff --git a/syslog.c b/syslog.c
index 8c7b81ef..aa3539c3 100644
--- a/syslog.c
+++ b/syslog.c
@@ -231,7 +231,7 @@ static_def(struct strm_ops syslog_strm_ops =
                 syslog_put_string,
                 syslog_put_char,
                 syslog_put_byte,
-                0, 0, 0, 0, 0, 0, 0, 0,
+                0, 0, 0, 0, 0, 0, 0, 0, 0,
                 syslog_get_prop,
                 syslog_set_prop,
                 0, 0, 0))