From 2ddefb59504d81ba534b747260d32617b3bcc192 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Tue, 21 Dec 2010 10:21:01 +0000 Subject: [PATCH] Fix Windows build --- rts/win32/AsyncIO.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/rts/win32/AsyncIO.c b/rts/win32/AsyncIO.c index ff2e1a2..979df0c 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; } -- 1.7.10.4