diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2010-12-21 10:21:01 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2010-12-21 10:21:01 +0000 |
| commit | 2ddefb59504d81ba534b747260d32617b3bcc192 (patch) | |
| tree | 398a71413bbc29ba7d8f1c51bb059770d02a1654 /rts | |
| parent | b3e443af986a597a5b6be88c4d270bac58e422a7 (diff) | |
| download | haskell-2ddefb59504d81ba534b747260d32617b3bcc192.tar.gz | |
Fix Windows build
Diffstat (limited to 'rts')
| -rw-r--r-- | rts/win32/AsyncIO.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/win32/AsyncIO.c b/rts/win32/AsyncIO.c index ff2e1a2498..979df0cb27 100644 --- a/rts/win32/AsyncIO.c +++ b/rts/win32/AsyncIO.c @@ -304,7 +304,7 @@ start: // stg_block_async_info stack frame, because // the block_info field will be overwritten by // pushOnRunQueue(). - tso->sp[1] = (W_)tso->block_info.async_result; + tso->stackobj->sp[1] = (W_)tso->block_info.async_result; pushOnRunQueue(&MainCapability, tso); break; } |