From fd58862f51cd3f5fdbd6e93549721f19252499bc Mon Sep 17 00:00:00 2001 From: Artur Bergman Date: Thu, 27 Sep 2001 08:53:00 +0000 Subject: [PATCH] Flush buffers on thread closedown. p4raw-id: //depot/perl@12244 --- ext/threads/threads.xs | 1 + 1 file changed, 1 insertion(+) diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index cbfcd1f0f8..5caedbe65e 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -56,6 +56,7 @@ void* Perl_thread_run(void * arg) { } MUTEX_LOCK(&thread->mutex); + PerlIO_flush((PerlIO*)NULL); perl_destruct(thread->interp); perl_free(thread->interp); if(thread->detached == 1) { -- 2.34.1