New stream property: name. Some streams can report

their name: some kind of string.

* stream.c (name_k): New variable.
(null_get_prop): New static function.
(null_ops): Wire null_get_prop into ops structure.
(stdio_get_prop): Report h->descr as name.
(string_in_get_prop): New function.
(string_in_ops): Wire string_in_get_prop into ops structure.
(stream_init): Initialize name_k.

* stream.h (name_k): Declared.

* syslog.c (syslog_get_prop): Report "syslog" as
stream name.

1 files changed, 1 insertions, 1 deletions

diff --git a/stream.h b/stream.h
index 0748a00c..36236622 100644
--- a/stream.h
+++ b/stream.h
@@ -52,7 +52,7 @@ extern val dev_k, ino_k, mode_k, nlink_k, uid_k;
 extern val gid_k, rdev_k, size_k, blksize_k, blocks_k;
 extern val atime_k, mtime_k, ctime_k;
 extern val from_start_k, from_current_k, from_end_k;
-extern val real_time_k;
+extern val real_time_k, name_k;
 
 extern val s_ifmt, s_iflnk, s_ifreg, s_ifblk, s_ifdir;
 extern val s_ifchr, s_ififo, s_isuid, s_isgid, s_isvtx, s_irwxu;