summaryrefslogtreecommitdiff
path: root/rts/parallel
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-02-06 13:07:15 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-02-06 13:07:15 +0000
commit0366875f9b2b687b6d2af34eb5eab9da493b2c53 (patch)
tree66e18f84d438576fa6d6ae109b8faab6eab1eefc /rts/parallel
parentc8072f7b36603a68b56fb22ffb1d0a98ae87cdb0 (diff)
downloadhaskell-0366875f9b2b687b6d2af34eb5eab9da493b2c53.tar.gz
tiny cleanup
Diffstat (limited to 'rts/parallel')
-rw-r--r--rts/parallel/WSDeque.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/parallel/WSDeque.c b/rts/parallel/WSDeque.c
index e7fd58ae92..6dfabd927a 100644
--- a/rts/parallel/WSDeque.c
+++ b/rts/parallel/WSDeque.c
@@ -275,7 +275,7 @@ pushWSDeque (WSDeque* q, void * elem)
}
pos = (q->elements) + (b & sz);
*pos = elem;
- (q->bottom)++;
+ q->bottom = b + 1;
ASSERT_WSDEQUE_INVARIANTS(q);
return rtsTrue;