diff options
| author | donnie@darthik.com <unknown> | 2009-04-13 01:17:01 +0000 |
|---|---|---|
| committer | donnie@darthik.com <unknown> | 2009-04-13 01:17:01 +0000 |
| commit | 9211ec0183bbe923ec6c5997fa695e5f5a3eefab (patch) | |
| tree | b69d7c45237544e163f6f07bd62f9cba7dcfaca7 /rts/Sparks.c | |
| parent | 6f045438008234fe58c7629ce1b33e3524fc9006 (diff) | |
| download | haskell-9211ec0183bbe923ec6c5997fa695e5f5a3eefab.tar.gz | |
For consistency, changed access of thread id to be through capability instead of directly from StgRegTable.
Diffstat (limited to 'rts/Sparks.c')
| -rw-r--r-- | rts/Sparks.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/Sparks.c b/rts/Sparks.c index 75464d925b..7e89d46c66 100644 --- a/rts/Sparks.c +++ b/rts/Sparks.c @@ -91,7 +91,7 @@ newSpark (StgRegTable *reg, StgClosure *p) cap->sparks_created++; - postEvent(cap, EVENT_CREATE_SPARK, reg->rCurrentTSO->id, 0); + postEvent(cap, EVENT_CREATE_SPARK, cap->r.rCurrentTSO->id, 0); return 1; } |