projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
2772949
)
fix warnings with gcc 4.3
author
Simon Marlow
<marlowsd@gmail.com>
Wed, 18 Jun 2008 14:43:07 +0000
(14:43 +0000)
committer
Simon Marlow
<marlowsd@gmail.com>
Wed, 18 Jun 2008 14:43:07 +0000
(14:43 +0000)
rts/STM.c
patch
|
blob
|
history
diff --git
a/rts/STM.c
b/rts/STM.c
index
c43e7ca
..
c271a25
100644
(file)
--- 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) {
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);
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) {
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);
TRecEntry *entry = NULL;
TRACE("%p : stmWriteTVar(%p, %p)", trec, tvar, new_value);
ASSERT (trec != NO_TREC);