Commit 2bac3406 authored by dimitris's avatar dimitris Committed by Simon Marlow
Browse files

fix dynamic way on Win32 (missing bits from flushStdHandles changes)

parent aa564232
......@@ -94,6 +94,8 @@ PRELUDE_INFO(base_GHCziStable_StablePtr_con_info);
#define ensureIOManagerIsRunning_closure DLL_IMPORT_DATA_REF(base_GHCziConcziIO_ensureIOManagerIsRunning_closure)
#define runHandlers_closure DLL_IMPORT_DATA_REF(base_GHCziConcziSignal_runHandlers_closure)
#define flushStdHandles_closure DLL_IMPORT_DATA_REF(base_GHCziTopHandler_flushStdHandles_closure)
#define stackOverflow_closure DLL_IMPORT_DATA_REF(base_GHCziIOziException_stackOverflow_closure)
#define heapOverflow_closure DLL_IMPORT_DATA_REF(base_GHCziIOziException_heapOverflow_closure)
#define blockedIndefinitelyOnMVar_closure DLL_IMPORT_DATA_REF(base_GHCziIOziException_blockedIndefinitelyOnMVar_closure)
......
......@@ -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);
}
......
......@@ -30,6 +30,8 @@ EXPORTS
base_GHCziConcziIO_ensureIOManagerIsRunning_closure
base_GHCziConcziSync_runSparks_closure
base_GHCziTopHandler_flushStdHandles_closure
base_GHCziWeak_runFinalizzerBatch_closure
base_GHCziPack_unpackCString_closure
base_GHCziIOziException_blockedIndefinitelyOnMVar_closure
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment