summaryrefslogtreecommitdiff
path: root/rts/RtsStartup.c
diff options
context:
space:
mode:
authorDimitrios Vytiniotis <dimitris@microsoft.com>2011-11-09 10:33:07 +0000
committerSimon Marlow <marlowsd@gmail.com>2011-11-09 11:35:55 +0000
commit2bac34064fa02d50b3501c0973c1eac73e91be74 (patch)
treeca81a9e84837c439f206bc35950a04c93076ceb8 /rts/RtsStartup.c
parentaa564232ee67d46403a69b02b0b8faf2455894f8 (diff)
downloadhaskell-2bac34064fa02d50b3501c0973c1eac73e91be74.tar.gz
fix dynamic way on Win32 (missing bits from flushStdHandles changes)
Diffstat (limited to 'rts/RtsStartup.c')
-rwxr-xr-x[-rw-r--r--]rts/RtsStartup.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/rts/RtsStartup.c b/rts/RtsStartup.c
index 6e803bba24..de8bf792c4 100644..100755
--- a/rts/RtsStartup.c
+++ b/rts/RtsStartup.c
@@ -418,7 +418,7 @@ static void flushStdHandles(void)
{
Capability *cap;
cap = rts_lock();
- rts_evalIO(cap, &base_GHCziTopHandler_flushStdHandles_closure, NULL);
+ rts_evalIO(cap, flushStdHandles_closure, NULL);
rts_unlock(cap);
}