Commit 59f9991a authored by Simon Marlow's avatar Simon Marlow
Browse files

hs_add_root() is necessary before calling any Haskell code

parent 63c4d234
......@@ -6,9 +6,12 @@
#include <windows.h>
#endif
void __stginit_Test(void);
int main(int argc, char *argv[])
{
hs_init(&argc,&argv);
hs_add_root(__stginit_Test);
f(500000);
#if mingw32_HOST_OS
Sleep(100);
......
Supports Markdown
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