diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-03-27 12:23:23 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-03-27 12:23:23 +0000 |
| commit | 5ed93b107550cc10fda7ae187de65da1a4b24d87 (patch) | |
| tree | b4f5cbcd229b590b6df99028e98d3ddd5c9a14e5 | |
| parent | 24fd303c1d5f8199556a9a119ad5bcb9cc8f625b (diff) | |
| download | haskell-5ed93b107550cc10fda7ae187de65da1a4b24d87.tar.gz | |
eliminate a warning
| -rw-r--r-- | ghc/includes/SMP.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ghc/includes/SMP.h b/ghc/includes/SMP.h index 93af9dfa9f..5974c962ad 100644 --- a/ghc/includes/SMP.h +++ b/ghc/includes/SMP.h @@ -121,7 +121,7 @@ lockClosure(StgClosure *p) do { nat i = 0; do { - info = xchg((P_)&p->header.info, (W_)&stg_WHITEHOLE_info); + info = xchg((P_)(void *)&p->header.info, (W_)&stg_WHITEHOLE_info); if (info != (W_)&stg_WHITEHOLE_info) return (StgInfoTable *)info; } while (++i < SPIN_COUNT); yieldThread(); |