From 2666606c37c09f62a1f69e2cae2faf375d42fc41 Mon Sep 17 00:00:00 2001 From: Mike Pomraning Date: Sun, 21 Dec 2003 19:52:08 -0600 Subject: [PATCH] Re: Smoke [5.8.2] 21930 FAIL(t) MSWin32 5.1 Service Pack 1 (x86/1 cpu) Message-ID: From: Mike Pomraning p4raw-id: //depot/perl@21948 --- ext/threads/shared/shared.xs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ext/threads/shared/shared.xs b/ext/threads/shared/shared.xs index 911d9ca..4e564c5 100644 --- a/ext/threads/shared/shared.xs +++ b/ext/threads/shared/shared.xs @@ -421,7 +421,7 @@ Perl_sharedsv_share(pTHX_ SV *sv) #if defined(WIN32) || defined(OS2) # define ABS2RELMILLI(abs) \ do { \ - abs -= (double)time(NULL) \ + abs -= (double)time(NULL); \ if (abs > 0) { abs *= 1000; } \ else { abs = 0; } \ } while (0) @@ -450,7 +450,7 @@ Perl_sharedsv_cond_timedwait(perl_cond *cond, perl_mutex *mut, double abs) break; } MUTEX_LOCK(mut); - c->waiters--; + cond->waiters--; return got_it; # else # ifdef OS2 -- 2.7.4