summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--io.c15
1 files changed, 11 insertions, 4 deletions
diff --git a/io.c b/io.c
index 0f6afb7bc4..1254e92363 100644
--- a/io.c
+++ b/io.c
@@ -4295,7 +4295,7 @@ static void free_io_buffer(rb_io_buffer_t *buf);
static void clear_codeconv(rb_io_t *fptr);
static void
-fptr_finalize_flush(rb_io_t *fptr, int noraise)
+fptr_finalize_flush(rb_io_t *fptr, int noraise, int keepgvl)
{
VALUE err = Qnil;
int fd = fptr->fd;
@@ -4343,7 +4343,7 @@ fptr_finalize_flush(rb_io_t *fptr, int noraise)
* We assumes it is closed. */
/**/
- int keepgvl = !(mode & FMODE_WRITABLE);
+ keepgvl |= !(mode & FMODE_WRITABLE);
keepgvl |= noraise;
if ((maygvl_close(fd, keepgvl) < 0) && NIL_P(err))
err = noraise ? Qtrue : INT2NUM(errno);
@@ -4360,7 +4360,7 @@ fptr_finalize_flush(rb_io_t *fptr, int noraise)
static void
fptr_finalize(rb_io_t *fptr, int noraise)
{
- fptr_finalize_flush(fptr, noraise);
+ fptr_finalize_flush(fptr, noraise, FALSE);
free_io_buffer(&fptr->rbuf);
free_io_buffer(&fptr->wbuf);
clear_codeconv(fptr);
@@ -4440,6 +4440,13 @@ rb_io_memsize(const rb_io_t *fptr)
return size;
}
+#ifdef _WIN32
+/* keep GVL while closing to prevent crash on Windows */
+# define KEEPGVL TRUE
+#else
+# define KEEPGVL FALSE
+#endif
+
int rb_notify_fd_close(int fd);
static rb_io_t *
io_close_fptr(VALUE io)
@@ -4464,8 +4471,8 @@ io_close_fptr(VALUE io)
fd = fptr->fd;
busy = rb_notify_fd_close(fd);
- fptr_finalize_flush(fptr, FALSE);
if (busy) {
+ fptr_finalize_flush(fptr, FALSE, KEEPGVL);
do rb_thread_schedule(); while (rb_notify_fd_close(fd));
}
rb_io_fptr_cleanup(fptr, FALSE);