Commit a27ed15f authored by simonmar's avatar simonmar
Browse files

[project @ 2006-01-09 14:35:53 by simonmar]

Avoid "dereferencing type-punned pointer will break strict-aliasing rules" warning
parent fff682f4
......@@ -103,7 +103,7 @@ int main(int argc, char *argv[])
/* ToDo: want to start with a larger stack size */
{
void *cap = rts_lock();
cap = rts_evalLazyIO(cap,(HaskellObj)mainIO_closure, NULL);
cap = rts_evalLazyIO(cap,(HaskellObj)(void *)mainIO_closure, NULL);
status = rts_getSchedStatus(cap);
rts_unlock(cap);
}
......
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