---
tcp.scm | 1 +
1 file changed, 1 insertion(+)
diff --git a/tcp.scm b/tcp.scm
index ce7bb74..5389ed1 100644
--- a/tcp.scm
+++ b/tcp.scm
@@ -359,6 +359,7 @@ EOF
(let* ((buf (make-string +input-buffer-size+))
(data (vector fd #f #f buf 0))
(buflen 0)
+ (bufpos 0)
(bufindex 0)
(iclosed #f)
(oclosed #f)
--
1.7.10.4_______________________________________________ Chicken-hackers mailing list [email protected] https://lists.nongnu.org/mailman/listinfo/chicken-hackers
