summaryrefslogtreecommitdiff
path: root/rts/STM.c
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2008-06-18 14:43:07 +0000
committerSimon Marlow <marlowsd@gmail.com>2008-06-18 14:43:07 +0000
commit067ec969bb0bdc4c88582e53b040fa2925cbcc56 (patch)
treeef2e06df1e57d9ec03d3be1c94ca4ea7283ae0a7 /rts/STM.c
parent27729498e1814d890081cc615b6682f65520b1bf (diff)
downloadhaskell-067ec969bb0bdc4c88582e53b040fa2925cbcc56.tar.gz
fix warnings with gcc 4.3
Diffstat (limited to 'rts/STM.c')
-rw-r--r--rts/STM.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/STM.c b/rts/STM.c
index c43e7ca4d8..c271a25d3c 100644
--- a/rts/STM.c
+++ b/rts/STM.c
@@ -1580,7 +1580,7 @@ static StgClosure *read_current_value(StgTRecHeader *trec STG_UNUSED, StgTVar *t
StgClosure *stmReadTVar(Capability *cap,
StgTRecHeader *trec,
StgTVar *tvar) {
- StgTRecHeader *entry_in;
+ StgTRecHeader *entry_in = NULL;
StgClosure *result = NULL;
TRecEntry *entry = NULL;
TRACE("%p : stmReadTVar(%p)", trec, tvar);
@@ -1623,7 +1623,7 @@ void stmWriteTVar(Capability *cap,
StgTVar *tvar,
StgClosure *new_value) {
- StgTRecHeader *entry_in;
+ StgTRecHeader *entry_in = NULL;
TRecEntry *entry = NULL;
TRACE("%p : stmWriteTVar(%p, %p)", trec, tvar, new_value);
ASSERT (trec != NO_TREC);