Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : master
http://hackage.haskell.org/trac/ghc/changeset/029cd4345a3662f9951d4b3245dc594f24f00b6a >--------------------------------------------------------------- commit 029cd4345a3662f9951d4b3245dc594f24f00b6a Author: Ian Lynagh <[email protected]> Date: Fri Mar 16 15:23:53 2012 +0000 Remove an unused variable; fixes a warning on Win64 >--------------------------------------------------------------- rts/win32/AwaitEvent.c | 4 +--- 1 files changed, 1 insertions(+), 3 deletions(-) diff --git a/rts/win32/AwaitEvent.c b/rts/win32/AwaitEvent.c index 1b92c43..af9c658 100644 --- a/rts/win32/AwaitEvent.c +++ b/rts/win32/AwaitEvent.c @@ -27,13 +27,11 @@ static nat workerWaitingForRequests = 0; void awaitEvent(rtsBool wait) { - int ret; - do { /* Try to de-queue completed IO requests */ workerWaitingForRequests = 1; - ret = awaitRequests(wait); + awaitRequests(wait); workerWaitingForRequests = 0; // If a signal was raised, we need to service it _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
