diff options
author | Simon Marlow <marlowsd@gmail.com> | 2008-06-18 14:43:07 +0000 |
---|---|---|
committer | Simon Marlow <marlowsd@gmail.com> | 2008-06-18 14:43:07 +0000 |
commit | 067ec969bb0bdc4c88582e53b040fa2925cbcc56 (patch) | |
tree | ef2e06df1e57d9ec03d3be1c94ca4ea7283ae0a7 /rts | |
parent | 27729498e1814d890081cc615b6682f65520b1bf (diff) | |
download | haskell-067ec969bb0bdc4c88582e53b040fa2925cbcc56.tar.gz |
fix warnings with gcc 4.3
Diffstat (limited to 'rts')
-rw-r--r-- | rts/STM.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -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); |