From c612409cd38d22a6c8926ee92b89ec7b17a1f578 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Mon, 2 Jun 2025 19:57:24 -0700
Subject: streams: get-string for string byte input stream.

* stream.c (byte_in_ops): Wire get_string operation to
generic_get_string, giving the stream get-line and get-string
support.
---
 stream.c | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/stream.c b/stream.c
index 8e4f8ec6..5dbc0a2e 100644
--- a/stream.c
+++ b/stream.c
@@ -2306,7 +2306,8 @@ static struct strm_ops byte_in_ops =
                               cobj_eq_hash_op,
                               0),
                 wli("byte-input-stream"),
-                0, 0, 0, 0,
+                0, 0, 0,
+                generic_get_string,
                 byte_in_get_char,
                 byte_in_get_byte,
                 byte_in_unget_char,
-- 
cgit v1.2.3