From 425a46131a029390cd693242e621f6632c76cc42 Mon Sep 17 00:00:00 2001
From: Samuel Williams <samuel.williams@oriontransfer.co.nz>
Date: Mon, 13 Jun 2022 15:33:54 +1200
Subject: Handle case where write result is zero.

---
 io.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'io.c')

diff --git a/io.c b/io.c
index d403df399c..170ccc690a 100644
--- a/io.c
+++ b/io.c
@@ -1620,6 +1620,12 @@ io_binwrite_string(VALUE arg)
         // Write as much as possible:
         ssize_t result = io_binwrite_string_internal(p->fptr, ptr, remaining);
 
+        // If only the internal buffer is written, result will be zero [bytes of given data written]. This means we
+        // should try again.
+        if (result == 0) {
+            errno = EWOULDBLOCK;
+        }
+
         if (result > 0) {
             if ((size_t)result == remaining) break;
             ptr += result;
-- 
cgit v1.2.1