Fix for interruptible FFI handling
authorSimon Marlow <marlowsd@gmail.com>
Sat, 25 Sep 2010 19:34:42 +0000 (19:34 +0000)
committerSimon Marlow <marlowsd@gmail.com>
Sat, 25 Sep 2010 19:34:42 +0000 (19:34 +0000)
commitb7212d4b53d12523c72cefe0d5cc3d318d3399a7
tree81abeba927bfe604a279b8fb54c59613c910f5f3
parent11fbcd763a9ab7b4135693c510b8bb4e4709a438
Fix for interruptible FFI handling
Set tso->why_blocked before calling maybePerformBlockedException(), so
that throwToSingleThreaded() doesn't try to unblock the current thread
(it is already unblocked).
rts/RaiseAsync.c
rts/Schedule.c