[project @ 2005-01-13 14:15:38 by simonmar]

[ghc-hetmet.git] / ghc / rts / win32 / WorkQueue.c

diff --git a/ghc/rts/win32/WorkQueue.c b/ghc/rts/win32/WorkQueue.c
index 6d3a358..85a2360 100644 (file)
--- a/ghc/rts/win32/WorkQueue.c
+++ b/ghc/rts/win32/WorkQueue.c
@@ -154,7 +154,7 @@ FetchWork ( WorkQueue* pq, void** ppw )
 /*
  * Function: SubmitWork
  *
- * Add work item to the queue, blocking if no room not available.
+ * Add work item to the queue, blocking if no room available.
  * Return value indicates of FALSE indicates error/fatal condition.
  */
 BOOL