From 2cbde3e64a824f993387406f3a73075cdb33c159 Mon Sep 17 00:00:00 2001
From: TudbuT <tudbut@tudbut.de>
Date: Tue, 17 May 2022 20:45:45 +0200
Subject: [PATCH] fix stream.readline

---
 stream.isbpl | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/stream.isbpl b/stream.isbpl
index 093eb6c..b3254e5 100644
--- a/stream.isbpl
+++ b/stream.isbpl
@@ -31,9 +31,9 @@ func stream.readline {
             -1
             2 stop
         }
-        while { ( i 1 + =i ) ( byte 10 eq not ) } {
+        while { ( i 1 + =i ) ( byte 10 eq not byte -1 eq not) } {
             id STREAM.read stream dup =byte _char 
-        }
+        } pop
     ] =array
     array alen 0 eq if {
         array _string