From: Simon Marlow <simonmar@microsoft.com>
Date: Tue, 29 Aug 2006 15:17:51 +0000 (+0000)
Subject: oops, got the sense of the error case wrong
X-Git-Tag: Before_FC_branch_merge~106
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=8edc7cea056b3de64508d700c1ace9965589a26e

oops, got the sense of the error case wrong
---

diff --git a/rts/win32/IOManager.c b/rts/win32/IOManager.c
index 993b1fb..2123b8c 100644
--- a/rts/win32/IOManager.c
+++ b/rts/win32/IOManager.c
@@ -340,7 +340,7 @@ depositWorkItem( unsigned int reqID,
 	if ( (ioMan->workersIdle < ioMan->queueSize) ) {
 	    /* No, go ahead and create another. */
 	    ioMan->numWorkers++;
-	    if (NewIOWorkerThread(ioMan)) {
+	    if (!NewIOWorkerThread(ioMan)) {
 		ioMan->numWorkers--;
 	    }
 	}