diff options
Diffstat (limited to 'ext/threads/threads.xs')
| -rwxr-xr-x | ext/threads/threads.xs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/ext/threads/threads.xs b/ext/threads/threads.xs index 38c56660f3..4ecb48873d 100755 --- a/ext/threads/threads.xs +++ b/ext/threads/threads.xs @@ -167,6 +167,7 @@ Perl_ithread_destruct (pTHX_ ithread* thread, const char *why) /* Thread is now disowned */ S_ithread_clear(aTHX_ thread); + aTHX = PL_curinterp; MUTEX_UNLOCK(&thread->mutex); MUTEX_DESTROY(&thread->mutex); #ifdef WIN32 |